在ggplot2的柱状图中显示百分比

在ggplot2中，你可以通过计算每个类别的百分比，然后将这些值用于标签。下面是一个如何在ggplot2的柱状图中显示百分比的例子。这里我们将使用R内置的mtcars数据集。

首先，我们安装和加载需要的库：

install.packages(c("ggplot2", "dplyr", "scales"))
library(ggplot2)
library(dplyr)
library(scales)

然后，我们创建一个新的数据框，计算每个气缸数(cyl)类别的数量和百分比：

mtcars_cyl <- mtcars %>%
  count(cyl) %>%
  mutate(perc = n/sum(n)*100)

接下来，我们创建一个柱状图，并使用geom_text添加百分比标签：

ggplot(mtcars_cyl, aes(x=factor(cyl), y=perc)) +
  geom_bar(stat="identity", fill="steelblue") +
  geom_text(aes(label=paste0(round(perc, 1), "%")), vjust=-0.5) +
  scale_y_continuous(labels = percent_format()) +
  labs(x="气缸数", y="百分比", title="mtcars数据集中各种气缸数的百分