设置颜色标签并在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")