교수님 안녕하십니까.
ggBar를 이용해서 간단한
interactive plot 을 만들어보려고 하고 있습니다.
ggplot에는 "scale_fill_manual"이라는 인자를 사용하면
각 bar의 색깔을 제가 원하는대로 지정할 수가 있습니다.
ggplot(data=fellow,aes(x=procedure,fill=name))+
geom_bar(position='dodge')+
ggtitle("1년차 펠로우 6월 내시경 실적")+
geom_text(aes(label=..count..),stat='count',position=position_dodge(0.9),vjust=-0.2)+
theme(plot.title = element_text(hjust = 0.5))+
scale_fill_manual(values=c("burlywood2", "darkorange", "khaki3","yellow2"))
하지만 ggBar에는 이런 기능이 있는지 함수 도움말을 찾아봐도
보이지가 않습니다.
palette 인자에 Brewer chart를 이용할 수는 있지만
이것도 색깔이 이미 다 정해져 있으니까요..
ggBar에는 palette말고 manual로 색깔을 지정할 수 있는
기능이 없는 것인지, 아니면 제가 못찾고 있는 것인지 궁금합니다.
기왕 만들거 interactive plot으로 만들면 더 멋질 것 같아서.. 질문드려봅니다 ^^
Comment 2
-
cardiomoon
2017.06.25 23:36
다음의 예를 보세요. ggBar()를 사용한후 ggiraph()로 출력하시면 됩니다.require(ggplot2)require(ggiraph)require(ggiraphExtra)require(moonBook)ggplot(acs,aes(x=sex,fill=Dx))+geom_bar(position="dodge")+scale_fill_manual(values=c("burlywood2", "darkorange", "khaki3","yellow2"))p<-ggBar(acs,aes(x=sex,fill=Dx),position="dodge")+scale_fill_manual(values=c("burlywood2", "darkorange", "khaki3","yellow2"))ggiraph(code=print(p)) -
스튜던트
2017.06.27 19:38
와! 감사합니다 교수님^^
No. | Subject | Author | Date |
---|---|---|---|
1253 | logistic regression 명령어 문의드립니다. [2] | 로렌쵸메디치 | 2023.11.22 |
1252 | spss 파일 불러오기. [1] | 통계린 | 2023.11.22 |
1251 | PSM 매칭변수 숫자 관련 문의입니다. [1] | 오하나 | 2023.11.22 |
1250 | Multiple imputation 관련 질문 및, age adjusted incidence rate 관련 질문을 드립니다. | YSKBH | 2023.11.15 |
1249 | semMediation 설치 재문의드립니다 [3] | 마술샘 | 2023.11.11 |
1248 | 안녕하세요. 정회원 문의 [1] | lionking | 2023.11.06 |
1247 | PSM 관련 질문드립니다. | dr. | 2023.11.05 |
1246 | ggplot [1] | 통계린 | 2023.10.30 |
1245 | 정회원 [1] | 통계린 | 2023.10.29 |
1244 | PSM 관련 질문 드립니다. [2] | 로렌쵸메디치 | 2023.10.25 |
1243 | forest plot 그림이 전체가 다 나오지 않습니다. [1] | joyguni | 2023.10.08 |
1242 | PSM caliper default 값 관련 문의드립니다. [1] | Ooppps | 2023.10.05 |
1241 | reliability test tool,,, [1] | FAdavid | 2023.10.05 |
1240 | 정회원 가입 확인 요청드립니다. [1] | osman | 2023.10.03 |
1239 | 생존분석, cox 회귀 관련 기초적인 질문 입니다. | 만니톨 | 2023.09.27 |
1238 | Twang-mnps에서 매칭된 데이터를 추출하는 방법 좀 알려주세요 | Dorocy | 2023.09.26 |
1237 | 영수증 발급을 부탁드립니다. [1] | 규빈어멈 | 2023.09.26 |
1236 | 정회원 확인 [2] | lionking | 2023.09.24 |
1235 | autoReg 에러 문의드립니다 [1] | 소소 | 2023.09.23 |
1234 | 안녕하세요 에러 관련 문의드립니다 [1] | 화이팅 | 2023.09.19 |