2014-11-26 9 views
3

동심 원형 차트를 만들려고합니다. 내부 원형은 3 가지 클래스의 주제를 나타내며 각 클래스는 3 개의 하위 클래스로 분할되어야합니다 (물론 하위 클래스의 슬라이스는 해당하는 내부 슬라이스와 일치해야합니다). 이 일동심 원형 차트를 그려 플롯

layout(matrix(c(1,1,1,1,2,1,1,1,1), nrow=3)); pie(x=c(14,22,15,3,15,33,0,6,45),labels="",col=c("#f21c39","#dba814","#7309de")); pie(x=c(51,51,51),labels=c("O","VG","V"),col=c("#c64719","#0600f5","#089c1f"))

하지만 내부 파이가 너무 작 : 이것은 내가 뭘하려합니다. radius 옵션으로 재생하려고했지만 외부 슬라이스가 내부 슬라이스와 일치하지 않습니다. 어떻게 조정할 수 있습니까?

답변

5

사용 par(new=TRUE)

pie(x=c(14,22,15,3,15,33,0,6,45),labels="", 
    col=c("#f21c39","#dba814","#7309de")) 
par(new=TRUE) 
pie(x=c(51,51,51),labels=c("O","VG","V"),radius=.5, 
    col=c("#c64719","#0600f5","#089c1f")) 

enter image description here

3

3 년 후이 경우 파이보다는 layout()을 overplot합니다. 이것은 sunburstR 패키지를 사용하여 달성 할 수 있습니다. http://timelyportfolio.github.io/sunburstR/example_baseball.html

예 :

DF <- data.frame(LOGRECNO = c(60, 61, 62, 63, 64, 65), 
      STATE = c(1, 1, 1, 1, 1, 1), 
      COUNTY = c(1, 1, 1, 1, 1, 1), 
      TRACT = c(21100, 21100, 21100, 21100, 21100, 21100), 
      BLOCK = c(1053, 1054, 1055, 1056, 1057, 1058)) 
DF$BLOCKID <- 
    paste(DF$LOGRECNO, DF$STATE, DF$COUNTY, 
     DF$TRACT, DF$BLOCK, sep = "-") 

DF %>% 
    select(BLOCKID) %>% 
    group_by(BLOCKID) %>% 
    summarise(Tots=n())->dftest 

sunburst(dftest) 

enter image description hereenter image description here

나는 당신이 당신의 필요에 따라 적합하게 적용 할 수 있습니다 확신합니다!

관련 문제