ggplot2：每个方面单独的色标

Question

直觉上我正在寻找类似的东西： facet_(scales="free_color")

我做了类似的事情

p <- ggplot(mpg, aes(year, displ, color=model)) + facet_wrap(~manufacturer)
p + geom_jitter()

那就是：绘制属于不同物种的个体（model）的二维测量值(manufacturer) 由物种组成，通过颜色表示个体。 问题是所有个体都共享相同的色标 - 因此一个面上的点具有非常相似的颜色。

将群体美学与 geom_line 一起使用可以解决问题，但线与点讲述的故事不同。

另一个明显的解决方案是放弃分面并为每个子集绘制单独的图。 （如果这是唯一的解决方案：是否有任何快速、智能或经过验证的方法可以做到这一点？）

Answer 1

当您按因子着色时，我不确定这是一个可用的选项。然而，生成单个图的快速方法如下：

d_ply(mpg, .(manufacturer), function(df) {
jpeg(paste(df$manufacturer[[1]], ".jpeg", sep=""))
plots <- ggplot(df, aes(year, displ, color=factor(model))) + geom_jitter()
print(plots)
dev.off()
})

相关答案：
多面 ggplot 的不同图例和填充颜色？

Answer 2

我认为您只是想按类别着色，每个制造商都会生产多个模型，每个模型每个类别只有一个或两个：

p <- ggplot(mpg, aes(year, displ, color=class)) + facet_wrap(~ manufacturer)
p + geom_jitter()