如何在ggplot2中更改散点图的颜色

时间:2009-09-08 19:46:49

标签: r ggplot2

在ggplot2中,我如何更改散点图中的着色颜色?

3 个答案:

答案 0 :(得分:12)

这是一个小数据集:

dat <- data.frame(x=1:20,
                  y=rnorm(20,0,10),
                  v=20:1)

假设我希望我的点使用值v着色。我可以使用scale_colour_gradient()功能更改着色的执行方式。

library(ggplot2)
qplot(x,y,data=dat,colour=color,size=4) + 
  scale_colour_gradient(low="black", high="white")

alt text

这个例子应该让你开始。有关详情,请查看其他帖子中提及的scale_brewer()

答案 1 :(得分:9)

查看scale_brewer http://www.had.co.nz/ggplot2/scale_brewer.html

的ggplot文档

一些例子:

#see available pallets:

library(RColorBrewer)
display.brewer.all(5)

#scatter plot
dsamp <- diamonds[sample(nrow(diamonds), 1000), ] 
d <- qplot(carat, price, data=dsamp, colour=clarity)
dev.new()
d
dev.new()
d + scale_colour_brewer(palette="Set1")
dev.new()
d + scale_colour_brewer(palette="Blues")

答案 2 :(得分:8)

如果您的数据具有您想要着色的离散类别,那么您的任务会更容易一些。例如,如果您的数据看起来像这样,每行代表一个事务,

> d <- data.frame(customer = sample(letters[1:5], size = 20, replace = TRUE),
>                sales = rnorm(20, 8000, 2000),
>                profit = rnorm(20, 40, 15))
> head(d,6)
customer    sales   profit
        a 8414.617 15.33714
        a 8759.878 61.54778
        e 8737.289 56.85504
        d 9516.348 24.60046
        c 8693.642 67.23576
        e 7291.325 26.12234

并且您想要制作由客户着色的交易的散点图,然后您可以执行此操作

p <- ggplot(d, aes(sales,profit))
p + geom_point(aes(colour = customer))

得到....

sales vs profit coloured on customer