10
我试图把标签上使用这种方法堆叠条形图(不过,如果现在有一个更好的方法我愿意什么都):中心标签堆叠栏(计数)GGPLOT2
Showing data values on stacked bar chart in ggplot2
这里是我的原创情节:
dat <- data.frame(with(mtcars, table(cyl, gear)))
ggplot(dat, aes(x = gear, fill = cyl)) +
geom_bar(aes(weight=Freq), position="stack") +
geom_text(position = "stack", aes(x = gear, y = Freq,
ymax = 15, label = cyl), size=4)
这是我尝试在每个填充部分居中标签:
dat2 <- ddply(dat, .(cyl), transform, pos = cumsum(Freq) - 0.5*Freq)
library(plyr)
ggplot(dat2, aes(x = gear, fill = cyl)) +
geom_bar(aes(weight=Freq), position="stack") +
geom_text(position = "stack", aes(x = gear, y = pos,
ymax = 15, label = cyl), size=4)
我怎样才能居中标签中的每个填充部分?
完美。我靠近但不完全。 +1 –