将“所有”类别添加到ggplots2图

Question

问题

假设我要为每个类别绘制一个密度图，并添加一个“所有”点类别。我将如何创建这样的数字？除了用“ all”类别复制所有点之外，还有其他方法吗？

示例

library('ggplot2')
fig <- ggplot(iris, aes(x = Sepal.Length, color = Species)) + 
       stat_density(geom = "line", position = "identity")

这将输出下图：

但是，我想添加另一行，其中包含所有要点。

Answer 1

ggplot(iris, aes(x = Sepal.Length, color = Species)) + 
  stat_density(geom = "line", position = "identity") + 
  stat_density(aes(x = Sepal.Length, color = "all"), geom = "line")