p1 <- ggplot(data, aes(x, y, group=label))
p2 <- p1 + geom_line()+geom_point()
library(RColorBrewer)
p2 + scale_fill_brewer(palette="Oranges")
可悲的是,由于声誉受限,我无法发布图片!结果是一个只有黑线和点的折线图。
如果我在aes()部分添加“color = label”,结果将使用默认颜色方案,而不是我想要的颜色。
我该怎么办?
答案 0 :(得分:1)
这样的东西?
require(ggplot2)
df <- data.frame(a = seq(0, 90, 10), b = seq(10, 100, 10))
ggplot(df, aes(a, b, group = 1, color = b)) +
geom_line() + geom_point() +
scale_color_gradient(low = "green", high = "red")