相关疑难解决方法(0)

ggplot的躲避酒吧情节再次令我难过.几个星期前我在这里询问了关于在栏上方注释文字的内容(LINK)并得到了极好的回应+ stat_bin(geom="text", aes(label=..count.., vjust=-1)).我想,因为我已经有了计数,我只会在..之前和之后提供它们,我告诉stat_bin它position是dodge.它将它们排列在组的中心上方并进行上下调整.可能是次要的.请帮我把文字翻到栏上.

mtcars2 <- data.frame(type=factor(mtcars$cyl), 
    group=factor(mtcars$gear))
library(plyr); library(ggplot)
dat <- rbind(ddply(mtcars2,.(type,group), summarise,
    count = length(group)),c(8,4,NA))

p2 <- ggplot(dat,aes(x = type,y = count,fill = group)) + 
    geom_bar(colour = "black",position = "dodge",stat = "identity") +
    stat_bin(geom="text", aes(position='dodge', label=count, vjust=-.6))