如何在R语言中生成N个差异最大的颜色组合？

我们需要为N个个体设计冗余颜色组合标记，具体需求如下：

• 现有6种可选颜色：white、red、green、blue、pink、yellow
• 每个个体有4个可贴颜色的位置，允许颜色重复使用
• 核心要求：即使丢失1个甚至2个位置的颜色，个体之间依然能被有效区分
• 需要从总共1296种可能的组合中，筛选出50-150种差异最大的组合

可复现代码 #

library(gtools)
x <- c("white", "red", "green", "blue", "pink", "yellow")
Perms <- permutations(n=6,r=4,v=x,repeats.allowed=T)
print(nrow(Perms))
head(Perms)

关键注意事项 #

前6种生成的组合仅单个位置颜色不同，若多个个体丢失该位置的颜色，将无法区分彼此，这类组合需要避免纳入最终筛选结果。

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