我有住房的数据框架,但不得不做另一个数据框架,需要总结住房类型取决于房子的面积,其中有2种类型的房屋在3个不同的地区。
df <- na.omit(n[, c("matssvaedi", "teg_eign_s_i")])
counts <- df %>%
group_by(matssvaedi, teg_eign_s_i)%>%
summarise(count = n())
df1 <- ggplot(counts, aes(x = matssvaedi, y = count))
df1 + geom_bar(aes(fill = teg_eign_s_i), stat = "identity", position = 'dodge') + geom_text(aes(label = count), color="black",vjust = 0.01, size = 3) + scale_fill_brewer(palette = "Paired") + theme_classic()
1条答案
按热度按时间pkmbmrz71#
假设您的问题是“如何将文本放置在相应的条形图的顶部?"在这种情况下,您可以向
geom_text()
添加一个position参数,方法与为geom_bar()
指定位置的方法相同,例如,请参阅下面的小reprex:您可以在
geom_text()
中使用vjust
参数,根据需要将文本稍微上移或下移。