このようなデータフレームがあります
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
LOG10 に対して BP をプロットし、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) から間隔を手動で選択し、好みの色 (赤、黄、緑、ライト、ダークブルー) にするにはどうすればよいですか? ? 色間の滑らかなグラデーションはクールですが、重要ではありません。