r - ggplot2 で scale_colour_gradient(low="red", high="blue") を使用して対称カラー スケールを作成します。

Question

scale_colour_gradient(low="red", high="blue")

ほとんどが赤に見える色のグラデーションを生成します。バイオレットred-violet-blueが真ん中にあると思っていましたが、手に入れましたred-still_red-violet-blue

バイオレットを中心としたグラデーションを取得するにはどうすればよいですか?

Answer 1

scale_colour_gradientn(colours=c("red","violet","blue"))

Answer 2

library(ggplot2)

dsub <- subset(diamonds, x > 5 & x < 6 & y > 5 & y < 6)
dsub$diff <- with(dsub, sqrt(abs(x-y))* sign(x-y))
(d <- qplot(x, y, data=dsub, colour=diff))

max_val <- max(abs(dsub$diff))
values <- seq(-max_val, max_val, length = 3)

d + scale_colour_gradientn(colours=c("red","violet","blue"),
                           values = values, rescaler = function(x, ...) x, oob = identity)

コメントで述べたように、scale_colour_gradient2を使用するとよりシンプルになります

 d + scale_colour_gradient2(low='red',mid='violet',high='blue')