如何在ggplot2中创建多个密度图，方法是将比较场景的一个密度图保持不变（在所有方面）？

Question

我有不同类型车辆（比如汽车，摩托车，卡车，公共汽车等）的速度数据，我想说明当我们比较汽车的速度时，这些不同类型车辆的速度有何不同。

例如：在上述情况中，应表示预先

由于密度（比较即（车载VS摩托车，汽车和卡车，汽车和总线）来创建3面.. !!!

Answer 1

正如在评论中提到的那样，您需要创建一个额外的dataframe，它会为您的每个成员显示相同的密度图。我们以diamonds数据集为例，我们将以"Fair"为基准：

# We use expand.grid to crate new data with same values for all levels 
fair_data <- expand.grid(carat = diamonds$carat[diamonds$cut == "Fair"], 
         cut = levels(diamonds$cut)[-1]) # We omit "Fair" 

# Plug into ggplot 
ggplot(subset(diamonds, cut != "Fair"), 
     aes(carat, colour = cut)) + 
    geom_density() + 
    geom_density(data = fair_data, colour = "black") + 
    facet_wrap(~cut)