스택 geom_bar의 누적 막대와 문제 및 라벨 내가이 막대 차트를

Question

잘못 :

group = c("A","A","B","B") 
value = c(25,-75,-40,-76) 
day = c(1,2,1,2) 
dat = data.frame(group = group , value = value, day = day) 

ggplot(data = dat, aes(x = group, y = value, fill = factor(day))) + 
    geom_bar(stat = "identity", position = "identity")+ 
    geom_text(aes(label = round(value,0)), color = "black", position = "stack") 

나는 나타나기 쌓아 바의 값을 싶습니다. 위의 코드를 실행할 때 -76이 올바른 위치에 있지 않으며 75도 보이지 않습니다.

번호를 올바른 위치에 표시하는 방법을 알려주세요. 음성 및 양성 값의 혼합 스태킹

는

Answer 1

ggplot(data=dat, aes(x=group, y=value, fill=factor(day))) + 
    geom_bar(stat="identity", position="identity")+ 
    geom_text(label =round(value,0),color = "black")+ 
    scale_y_continuous(breaks=c(-80,-40,0)) 

Answer 2

ggplot2 어렵다. 가장 쉬운 방법은 데이터 세트를 양수와 음수에 대해 두 개로 나눈 다음 막대 레이어를 별도로 추가하는 것입니다. 고전적인 예는 here입니다.

양의 y 값에 하나의 텍스트 레이어를 추가하고 네거티브에 하나의 텍스트 레이어를 추가하여 텍스트와 동일한 작업을 수행 할 수 있습니다.

dat1 = subset(dat, value >= 0) 
dat2 = subset(dat, value < 0) 

ggplot(mapping = aes(x = group, y = value, fill = factor(day))) + 
    geom_bar(data = dat1, stat = "identity", position = "stack")+ 
    geom_bar(data = dat2, stat = "identity", position = "stack") + 
    geom_text(data = dat1, aes(label = round(value,0)), color = "black", position = "stack") + 
    geom_text(data = dat2, aes(label = round(value,0)), color = "black", position = "stack") 

ggplot2 (2.1.0.9000)의 현재 개발 버전을 사용하는 경우

, 스택은 음의 값을 geom_text에서 제대로 작동하지 않는 것 같습니다. 필요한 경우 언제든지 "손으로"텍스트 위치를 계산할 수 있습니다.

library(dplyr) 
dat2 = dat2 %>% 
    group_by(group) %>% 
    mutate(pos = cumsum(value)) 

ggplot(mapping = aes(x = group, y = value, fill = factor(day))) + 
    geom_bar(data = dat1, stat = "identity", position = "stack")+ 
    geom_bar(data = dat2, stat = "identity", position = "stack") + 
    geom_text(data = dat1, aes(label = round(value,0)), color = "black") + 
    geom_text(data = dat2, aes(label = round(value,0), y = pos), color = "black")