如何手动修改distinctColorPalette生成调色板中辨识度低的颜色？

distinctColorPalette()生成的palette本质是一个字符向量，你可以直接通过索引位置替换指定位置的颜色（R的向量索引从1开始），操作非常直接：

1. 先运行初始代码生成调色板：

n <- 36
palette <- distinctColorPalette(k = n, runTsne = F)

2. 给目标位置赋值新颜色：

   • 替换第11号颜色：palette[11] <- "darkred"（支持颜色名称或十六进制码）
   • 替换第20号颜色：palette[20] <- "#2E8B57"（十六进制码对应深绿色）

3. 重新绘制饼图验证修改效果：

pie(rep(1, n), col=palette)

额外提示 #

• 颜色值可以用R内置的颜色名称（输入colors()可查看所有可选名称），或者十六进制颜色码（更精准控制色调与饱和度）
• 如果需要替换的浅色/灰色系颜色较多，可以先打印palette向量查看所有颜色值，筛选出需要替换的位置再批量修改

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