2016-09-01 4 views
6

목표는 R에 boxplots을 작성하는 것입니다 (ggplot2와 같을 필요는 없지만 지금 사용하고있는 것입니다).이 예제와 같은 스타일로 비슷한 상자가 있습니다. 마이너스 텍스트) : 여기ggplot2의 오류 막대에서 끝점을 제거하십시오.

boxplot-example

내가 지금까지 가지고있는 코드입니다 :

my-boxplot : 결과

dat <- read.table(file = "https://www.dropbox.com/s/b59b03rc8erea5d/dat.txt?dl=1", header = TRUE, sep = " ") 
library(ggplot2) 
p <- ggplot(dat, aes(x = Subscale, y = Score, fill = Class)) 
p + stat_boxplot(geom = "errorbar", width = 1.2, size = 2.5, color = "#0077B3") + 
    geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) + 
    scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) + 
    theme(panel.background = element_rect(fill = "white", color = "white")) 

분명히 내가 가지고있는 것과 실제로 보여주는 것 사이에는 많은 차이가 있지만, 지금은 오류 막대에서 끝점을 제거하는 데만 초점을 맞 춥니 다. stat_boxplot 기능. 누구든지 원하는 효과를 얻을 수있는 방법을 알고 있습니까?

답변

5

errorbar geom에있는 은 수평 끝 막대의 너비를 제어하므로 0으로 설정하여 끝 막대를 제거하십시오. stat_boxplot 레이어의 피하는 것이 누락되었으므로이를 추가하여 오류 막대가 올바르게 표시되지 않게 할 수 있습니다.

ggplot(dat, aes(x = Subscale, y = Score, fill = Class)) + 
    stat_boxplot(geom = "errorbar", width = 0, size = 2.5, 
       color = "#0077B3", position = position_dodge(.9)) + 
    geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) + 
    scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) + 
    theme(panel.background = element_rect(fill = "white", color = "white")) 

enter image description here

+0

와우, 나는 그것이 그렇게 쉬운 일이있을 거라고 생각하지 않았다! 정말 고맙습니다! 너비 속성이 완전히 다른 것을하고 있다고 생각했습니다. – psychometriko