如何将多个色标放入一个绘图R [重复]

Question

我有三个数据系列，它们由以下组成：

• X（浮点数）
• Y（浮点数）
• S（浮点数）
• 类（离散值）

所有三个数据系列共享相同的 X 坐标，但每个其他组件都与其他数据系列不同。通过为我的三个数据系列（R 中的库 ggpplot2）中的每一个使用一个 geom_point()，我想根据特定的S 用色标绘制每个数据系列，如下所示：

ggplot(data, aes(x=X)) + geom_point(aes(y=Y, colour=S, shape=Class)) 

如果我只使用一个数据系列，这很有效。问题是，如果我使用它们自己的Y 和S 定义三个geom_points()，它们都具有相同的色标，这在情节上有点混乱。

由于我已经在使用形状来区分 Classes 我真的很喜欢为我的每个数据系列使用具有自己颜色渐变的特定颜色。

比如说：

• 从深蓝色到浅蓝色的数据系列 1
• 数据系列 2 从深红色到浅红色
• 数据系列从深黄色到浅黄色 3

我环顾四周，但没有找到任何满足我需求的东西。一些 cmets 说使用 ggplot2 每个图不可能有多个色标...是真的吗？

如果有人已经想出这种带或不带 ggplot2 的情节，我将不胜感激他或她的解决方案。

Answer 1

在ggplot 中，您实际上只能使用alpha 来满足您的要求。我编了一些数据：

df1 <- data.frame(X=rnorm(16), Y=rnorm(16), S=rep(1:4,times=4), Class=rep(LETTERS[1:4], each=4))
df2 <- data.frame(X=rnorm(16), Y=rnorm(16), S=rep(1:4,times=4), Class=rep(LETTERS[1:4], each=4))
df3 <- data.frame(X=rnorm(16), Y=rnorm(16), S=rep(1:4,times=4), Class=rep(LETTERS[1:4], each=4))

ggplot(df1, aes(x)) + geom_point(aes(y=Y, colour=S, shape=Class))
df1$id <- 1
df2$id <- 2
df3$id <- 3
df.list <- list(df1, df2, df3)
df.all <- ldply(df.list, rbind)

ggplot(df.all, aes(X, Y)) + geom_point(aes(colour=as.factor(id), shape=Class, alpha=S))

不确定这是否符合您的要求...