r - 在 qplot 中设置颜色标签和改变调色板

Question

1. 使用下面的代码，我可以设置 x 轴和 y 轴的标签，但不能在这里设置 cyl 颜色标签。 documentation没有办法解决。

   qplot(mpg, wt, data=mtcars, colour=cyl,xlab="MPG",ylab="WT")
   

1. 如何改变 qplot 中的调色板？所以，我希望在 code 中做一些类似的事情下面:

   x <- runif(100)
   y<-runif(100)
   time<-runif(100)  
   pal <- colorRampPalette(c('white','black'))
   cols <- pal(10)[as.numeric(cut(time,breaks = 10))]
   plot(x,y,pch=19,col = cols)
   

Answer 1

您可以对这两项任务使用 scale_colour_continuous。

library(ggplot2)
qplot(mpg, wt, data = mtcars, colour = cyl, xlab = "MPG", ylab = "WT") +
  scale_colour_continuous(name = "Cylinders", low = "white", high = "black")

这里，name 参数是色标的标签。参数low和high表示连续色标的下限和上限。

---

如果要指定三种颜色的连续色标，可以使用scale_colour_gradient2:

qplot(mpg, wt, data = mtcars, colour = cyl, xlab = "MPG", ylab = "WT") +
  scale_colour_gradient2(name = "Cylinders", midpoint = median(mtcars$cyl),
                         low = "red", mid = "green", high = "black")