교수님 안녕하세요
교수님 책과 웹페이지 통해서 많은 도움을 얻고 있고있는 연구자입니다.
아래와 같이 bar plot을 그렸는데요. y 축은 count로 해서 MC 기준 그룹을 나누어 position dodge로 구분하였습니다.
X 축의 GAP score가 2점, 12점 일때 각각 negative, positivie group의 count가 '0'임을 표시하고 싶습니다.
한 그룹의 count가 0이면 그래프가 좌우로 늘어져 width가 넓어지는데요 이를 어떻게 수정하면 좋을지 문의드립니다.
x축의 '2'에 해당하는 그래프의 width를 절반으로 줄이고 그래프 자리에 count 숫자를 표시하고 싶습니다.
알려주시면 연구에 큰 도움이 될것 같습니다 ㅜㅜ
바쁘신와중에 항상 감사드립니다.
** 제가작성한 코드입니다.
df$MC=factor(df$MC,labels=c("negative","positive"))
ggplot(df, aes(x=GAP_score, y=..count.., fill=MC)) +
geom_bar(position="dodge", colour="#AACCCC")
Comment 4
-
cardiomoon
2020.11.27 10:14
-
cardiomoon
2020.11.27 10:15
-
cardiomoon
2020.11.27 10:18
또는 제가 만든 ggiraphExtra 패키지의 ggBar를 쓰시면 쉽게 해결됩니다.
require(ggiraphExtra)
ggBar(data=mpg,aes(x=class,fill=drv),position="dodge",addlabel=TRUE)
Recommend:1 Comment
-
hamdgogo
2020.11.28 09:27
감사합니다 선생님
한번에 해결이되었네요
ggiraphExtra package도 사용해보겠습니다
정말 감사드립니다!
No. | Subject | Author | Date |
---|---|---|---|
1234 | 안녕하세요 에러 관련 문의드립니다 [1] | 화이팅 | 2023.09.19 |
1233 | 선형회귀분석 시 보정변수 사용 관련 질문드립니다. [2] | 전한울 | 2023.09.18 |
1232 | 그래프 관련 문의드립니다. | nanak | 2023.09.14 |
1231 | 영수증 메일로 받을수 있을까요? [1] | 딸기공주 | 2023.09.13 |
1230 | mycsv 관련 문의드립니다. [1] | 도삼 | 2023.09.12 |
1229 | matched group 을 대상으로 stratified cox | saga | 2023.09.06 |
1228 | IPTW 시 SMD 계산 관련 여쭙습니다. | 장한나 | 2023.09.04 |
1227 | 회귀분석 관련 문의드립니다. [2] | 전한울 | 2023.09.04 |
1226 | PSM matching 실행시 disconnected 됩니다... [1] | 맹구모션 | 2023.08.25 |
1225 | 메타분석_출간오류분석 관련 질문드립니다. [2] | 블루레몬 | 2023.08.21 |
1224 | plot 문의 드립니다. | 1122 | 2023.08.20 |
1223 | semMediation 설치문의 [2] | 마술샘 | 2023.08.11 |
1222 | 로지스틱 회귀분석 문의드립니다. [2] | JKJ | 2023.08.09 |
1221 | 지출 문의 드립니다. [1] | 블루레몬 | 2023.08.08 |
1220 | autoReg 실행 중 에러 [1] | pkjsdf123 | 2023.08.08 |
1219 | 영수증 처리 [1] | britnepak | 2023.07.28 |
1218 | multipleROC 커브 글을 따라가다 궁금한 것이 생겨서 질문드립니다. [2] | rgppwls | 2023.07.20 |
1217 | disconnected from server 오류 [2] | JKJ | 2023.07.13 |
1216 | mytable에서 변수 순서와 ztable적용시 변수가 숫자로 변형 [1] | 둥니맨 | 2023.07.12 |
1215 | box plot 시 X 축 label이 다 나오지 않아 질문드립니다. [2] | 난둥 | 2023.07.03 |
안녕하세요? 사용하신 데이터가 없어 직접 코드를 보여드리지는 못합니다. 다음 두 plot을 참조하세요
require(ggplot2)
ggplot(data=mpg) + geom_bar(aes(x=class,fill = drv),position="dodge")
ggplot(data=mpg) + geom_bar(aes(x=class,fill = drv),position=position_dodge(preserve="single"))