设置颜色标签并在qplot中更改调色板

Question

1. 使用下面的代码，我可以为x和y轴设置标签，但在这里不能为cyl设置颜色。 该文档无法解决。

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

2. 如何在qplot更改调色板？ 因此，我希望在下面的代码中执行以下操作：

    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")