您可以为 ggplot 中的每个因子水平添加一个计数到图例吗？

Question

我正在使用 ggplot 生成散点图，并将按给定因素为数据点着色。生成的图例详细说明了分配给每个因素级别的颜色，但它是否也可以计算每个因素中的点数。

例如，我包含了汽车数据集的代码：

p <- ggplot(mtcars, aes(wt, mpg))
p + geom_point(aes(colour = factor(cyl)))

在此图中，我希望获得每个气缸数的计数。所以 4（计数 1）、6（计数 2）和 8（计数 3）。

提前致谢。

Answer 1

你可以试试这个

mtcars %>%
  group_by(cyl) %>%
  mutate(label = paste0(cyl, ' (Count ', n(), ')'))  %>%
  ggplot(aes(wt, mpg)) + 
    geom_point(aes(colour = factor(label)))

您可以为 ggplot 中的每个因子水平添加一个计数到图例吗？

Can you add a count to the legend for each level of a factor in ggplot?

r

legend

ggplot2