ggplot手动设置scale_color_gradientn

时间:2013-08-28 12:04:12

标签: r colors ggplot2 gradient

我有一个像这样的数据框

BP        R2      LOG10
96162057 0.2118000 2.66514431
96162096 0.0124700 0.31749391
96162281 0.0008941 0.07012148
96163560 0.5011000 2.48505399
96163638 0.8702000 3.37778598

我希望将BP绘制成LOG10,然后按R2对点进行着色。 R2是0-1的连续值。

myplot <- read.cvs("mytable.csv",head=TRUE)
attach(myplot)
ggplot(myplot,aes(BP,LOG10, color=R2)) + geom_point() 

到目前为止,这么好。但是我想以手动选择的间隔和颜色显示R2颜色,如下所示(如果我有离散值)。

ggplot(myplot,aes(BP,LOG10, color=R2)) + geom_point() + 
      scale_color_manual(breaks= c("1","0.8","0.6","0.4","0.2","0"), 
                values = c("red","yellow","green","lightblue","darkblue"))
Error: Continuous value supplied to discrete scale

这看起来很漂亮,但我宁愿将颜色设置为我自己。

ggplot(myplot,aes(BP,LOG10, color=R2)) + geom_point(shape=1) + 
               scale_colour_gradientn(colours = rainbow(10))

那么,如何从连续值(1-0.8,0.8-0.6,0.6-0.4,0.4-0.2,0.2-0)手动选择间隔,并根据我的喜好对它们进行着色(红色,黄色,绿色,浅色) , 深蓝)?颜色之间的平滑渐变很酷,但并不重要。

2 个答案:

答案 0 :(得分:15)

您可以使用scale_colour_gradientn(),然后提供自己的colours=values=。值将给出每种颜色的间隔。

ggplot(myplot,aes(BP,LOG10, color = R2)) + geom_point() + 
  scale_colour_gradientn(colours = c("red","yellow","green","lightblue","darkblue"),
                         values = c(1.0,0.8,0.6,0.4,0.2,0)) 

gradientn chart example

答案 1 :(得分:11)

4年后对这篇文章发表评论:重要的是要注意&#34;值&#34;将变量值映射在0和1,0之间,0表示最低值,1表示最高值。在这个例子中,它巧合地适应变量的值0到1。