그룹화 된 막대 그래프, 하나의 숫자 대 3 계승 변수

Question

다음과 같은 문제가 있습니다. 나는 3 인자 변수 대 1 숫자 변수를 barplot 할 필요가있다.

내 데이터 세트 :

Site,Gall,Status,Count 
Site1,absent,unhealthy,35 
Site1,absent,healthy,1750 
Site1,present,unhealthy,23 
Site1,present,healthy,1146 
Site2,absent,unhealthy,146 
Site2,absent,healthy,1642 
Site2,present,unhealthy,30 
Site2,present,healthy,333 

내가 ggplot를 사용하여 시도했다, 그러나 그것은 단지 나 x, y 및 한 번 더 옵션을 정의 할 수 있습니다, 그래서 = 담즙 채우기를 사용했다.

내 코드는 다음과 같이 보입니다. 아직 변수가 하나 빠져 있습니다.

ggplot(dat, aes(Status, Count, fill = Gall)) + 
    geom_bar(stat = "identity", position = "dodge") 

아무도 도와 줄 수 있습니까?

고맙습니다.

Answer 1

두 가지 해결책이 있습니다. 이 두 가지 요인에 의해 작성에 의도가 있다면, 당신은 interaction를 사용할 수 있습니다 일반적으로

ggplot(dat, aes(Status, Count)) + 
    geom_col(aes(fill = interaction(Site, Gall)), position = "dodge") 

하지만, 그것은 여러 요인 패 시팅을 사용하는 것이 좋습니다. 예를 들어 :

ggplot(dat, aes(Status, Count)) + 
    geom_col(aes(fill = Gall), position = "dodge") + facet_grid(Site ~ .) 

Answer 2

당신은 포인트 대신 막대가 더 좋을 수 있습니다. 예를 들어 :

library(dplyr) 
library(ggplot2) 

ggplot(dat %>% mutate(Site = gsub("([0-9]$)", " \\1", Site)), 
     aes(Status, Count, colour=Status, shape=Gall)) + 
    geom_point(size=3, position=position_dodge(0.5), stroke=1) + 
    facet_grid(~ Site, switch="x") + 
    theme_classic() + 
    theme(strip.placement = "outside", 
     strip.background=element_blank()) + 
    scale_colour_manual(values=hcl(c(195,15),100,65)) + 
    scale_shape_manual(values=c(1,16)) + 
    labs(x="") + 
    guides(colour=FALSE)