在R中制作WCS孟塞尔色卡时ggplot2的scale_fill_manual排序问题如何解决

核心问题原因 #

你遇到的色块排序混乱、y轴顺序不符合预期的问题来自两个错误：

1. 未将色相（H）、明度（V）变量转为符合孟塞尔排序规则的有序因子，ggplot默认按字符字典序或数值默认顺序排列，和目标排序不匹配
2. scale_fill_manual用法错误，手动传入的颜色值顺序和映射的变量顺序不匹配，直接使用scale_fill_identity()即可直接读取hex列的颜色值，无需手动匹配

完整修改代码 #

library(munsell)
library(ggplot2)

# 读取预处理后的WCS数据（预处理步骤：色相值后的.50替换为.5、删除.00）
WCS <- read.csv("cnum-vhcm-lab-new.txt", sep = "\t", header = T)
WCS$hex <- mnsl2hex(hvc2mnsl(hue = WCS$MunH, value = ceiling(WCS$MunV), chroma = WCS$C), fix = T)

# 排序处理
# 1. 色相转为有序因子，按数值从小到大匹配孟塞尔色相环顺序
WCS$H <- factor(WCS$H, levels = sort(unique(WCS$H)))
# 2. 明度转为有序因子，倒排levels直接实现y轴反转，无需额外调整坐标轴
WCS$V <- factor(WCS$V, levels = rev(sort(unique(WCS$V))))

# 绘图代码
ggplot(WCS, aes(x = H, y = V)) +   
  geom_tile(aes(fill = hex), show.legend = FALSE) +
  scale_fill_identity() +
  # 可选：调整x轴刻度密度，避免标签重叠
  scale_x_discrete(breaks = ~.x[seq(1, length(.x), by = 2)]) +
  # 可选：优化主题样式
  theme_minimal() +
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5))

其他可选方案 #

如果你不想将明度转为因子，也可以保留V为数值型，在绘图代码末尾添加scale_y_reverse()即可实现y轴反转，效果一致。

内容的提问来源于stack exchange，提问作者Annemarie