如何对3个变量抽样，确保每次生成的3个结果互不重复？

你的原代码存在几个关键问题，导致无法生成唯一值组合：

• 使用replace = TRUE（有放回抽样），这本身就可能抽到重复值，和需求矛盾
• 变量名c和R内置的c()函数重名，容易触发意外错误
• 代码里出现未定义的变量d，会直接运行报错
• 抽样逻辑依赖错误的变量引用，过滤逻辑完全失效

正确实现方式 #

要从3个元素里生成全唯一的随机组合，本质就是对原向量做无放回全抽样，直接用sample()函数的无放回模式即可，代码如下：

# 定义原始字符串向量
original_vec <- c('ABC', 'XYZ', 'LMN')
# 无放回抽取全部3个元素，得到随机打乱的唯一组合
sampled_result <- sample(original_vec, size = 3, replace = FALSE)
# 将结果分配给三个变量（避免用c当变量名，防止覆盖内置函数）
a <- sampled_result[1]
b <- sampled_result[2]
c_var <- sampled_result[3]

# 打印验证结果
cat("a =", a, ", b =", b, ", c =", c_var, "\n")

或者用更简洁的结构赋值写法：

original_vec <- c('ABC', 'XYZ', 'LMN')
# 直接将抽样结果分配给三个变量
c(a, b, c_var) %<-% sample(original_vec, 3, replace = FALSE)

每次运行这段代码，a、b、c_var都会是original_vec里三个元素的随机排列，保证完全唯一。

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