如何获取iNEXT包ggiNEXT函数默认调色板以匹配ggplot2绘图？

有两种简单方法可以获取ggiNEXT的默认配色：

方法一：从生成的绘图对象中提取颜色值 #

运行你的示例代码并保存绘图对象，然后通过以下代码提取颜色：

library(iNEXT)
library(ggplot2)
z <- iNEXT(spider, q=c(0,1,2), datatype="abundance")
# 生成绘图对象并保存
p <- ggiNEXT(z, facet.var="Assemblage", color.var="Order.q")

# 提取颜色映射对应的所有颜色值
p$scales$scales[[1]]$palette()(length(unique(z$iNextEst$Order.q)))

# 或者通过ggplot_build查看实际使用的颜色
gb <- ggplot_build(p)
# 线条颜色
unique(gb$data[[1]]$colour)
# 置信区间边框颜色
unique(gb$data[[2]]$colour)

运行后会得到类似#F8766D、#00BA38、#619CFF的十六进制颜色值，这些就是ggiNEXT默认使用的颜色。

方法二：查看ggiNEXT函数源码确认默认配色 #

在R控制台中直接输入ggiNEXT并回车，查看函数的源码内容，找到颜色相关的设置逻辑。你会发现ggiNEXT默认使用ggplot2的scale_color_hue()调色板（即ggplot2默认离散配色），通过源码可以直接确认默认配色方案。

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