使用ggplot将颜色应用于折线图

Question

我使用ggplot生成了一个折线图。该数据包含两组，每组9个样本，随后超过11个时间点（x值）。现在，我试图给一组的每个样品线一个单独的颜色，同时只给另一组的样品一个颜色（这里：黑色）。 这是我脚本的重要部分。

data <- read.csv2("140929 example.csv",check.names = FALSE)
library(reshape2)
data.m <- melt(data)
library(ggplot2)
ggplot(data.m, aes(x = variable, y = value, group = Group,colour = Group))+
geom_line()+
theme_bw()

这会产生一个包含所有线条的单独颜色的图表。

我该如何改进？谢谢你的帮助。

Answer 1

如果没有数据或当前情节的图片，这有点难以辨别。但您可以尝试为data.m指定一个新变量来控制颜色。 I.E.将一个新变量设置为一个序列，然后对于纯色组，在整个组中将其设置为相同。

data.m$mycolor <- 1:nrow(data.m)
data.m[data.m$group == somegroup,]$mycolor <- 0

然后在审美用途colour = mycolor