如何在R的ggplot2中使用自定义填充调色板？报错求助

问题描述 #

我尝试使用十六进制代码创建自定义调色板，并将其用于geom_bar的fill美学（离散变量）。代码如下：

创建调色板的代码：

library(pacman)
p_load(tidyverse, ggplot2, RColorBrewer)

palette_new <- colorRampPalette(colors = c("white", "#154360", "#FF5733", "#FFC300", "#1ABC9C"))(5)
scales::show_col(palette)

生成的调色板预览：

尝试应用到图表的代码：

data(diamonds)

ggplot(diamonds, aes(x = color, fill = cut)) +
  geom_bar() +
  scale_fill_brewer(palette = "palette_new")

运行后出现警告：

Warning message:
In pal_name(palette, type) : Unknown palette palette_new

已尝试多种方法但未解决，寻求帮助。

解决方案 #

核心问题 #

scale_fill_brewer() 仅支持调用RColorBrewer包内置的调色板名称，无法直接传入自定义的调色板向量，这就是警告出现的原因。

修复步骤 #

1. 修正调色板预览代码的错误：原代码中scales::show_col(palette)里的palette是未定义对象，需改为你创建的palette_new：

scales::show_col(palette_new)

2. 替换为支持自定义调色板的函数：使用*scale_fill_manual()* 替代*scale_fill_brewer()*，将自定义调色板向量传入values参数：

完整修正后的代码：

library(pacman)
p_load(tidyverse, ggplot2, RColorBrewer)

# 创建并预览自定义调色板
palette_new <- colorRampPalette(colors = c("white", "#154360", "#FF5733", "#FFC300", "#1ABC9C"))(5)
scales::show_col(palette_new)

# 应用自定义调色板到图表
data(diamonds)

ggplot(diamonds, aes(x = color, fill = cut)) +
  geom_bar() +
  scale_fill_manual(values = palette_new)

注意事项 #

确保自定义调色板的颜色数量与fill映射的离散变量水平数一致（本例中cut变量有5个水平，调色板刚好生成5种颜色，匹配合适）。若数量不匹配，ggplot会循环使用调色板颜色或抛出警告。

内容的提问来源于stack exchange，提问作者Abbey A.