且构网

分享程序员开发的那些事...
且构网 - 分享程序员编程开发的那些事

你如何在ggplot2中创建一个离散变量的颜色渐变?

更新时间:2023-11-17 16:58:16

ggplot的默认渐变函数需要一个连续的缩放比例。最简单的工作就是像@Roland建议的那样转换为连续的。您还可以使用 scale_color_manual 指定所需的任何颜色比例。您可以获得ggplot将使用的颜色列表

  cc<  -  scales :: seq_gradient_pal(blue,红色,实验室)(seq(0,1,length.out = 100))

这会将100种颜色从蓝色恢复为红色。然后,您可以在您的阴谋中使用它们

  qplot(data = df,x = X,y = Y,color = category ,geom =line)+ 
scale_colour_manual(values = cc)


I have data with about 100 ordered categories. I would like to plot each category as a line separately, with the line colors ranging from a low value (say, blue) to a high value (say, red).

Here's some sample data, and a plot.

# Example data: normal CDFs

library(ggplot2)

category <- 1:100
X <- seq(0, 1, by = .1)
df <- data.frame(expand.grid(category, X))
names(df) <- c("category", "X")
df <- within(df, {
  Y <- pnorm(X, mean = category / 100)
  category <- factor(category)
  })

# Plot with ggplot
qplot(data = df, x = X, y = Y, color = category, geom = "line")

This produces a pretty rainbow thing (below)

but I'd rather have a gradient from blue to red. Any ideas how I can do that?

The default gradient functions for ggplot expect a continuous scale. The easiest work around is to convert to continuous like @Roland suggested. You can also specify whatever color scale you want with scale_color_manual. You can get the list of colors ggplot would have used with

cc <- scales::seq_gradient_pal("blue", "red", "Lab")(seq(0,1,length.out=100))

This returns 100 colors from blue to red. You can then use them in your plot with

qplot(data = df, x = X, y = Y, color = category, geom = "line") +     
    scale_colour_manual(values=cc)