score = c(22,20,30,12,29,21,18,31,27,29,22,48,13,18,10,11,17,10,22,28,14,19,30,22,9)
x <- sample(score,size=13,replace=FALSE)
y <- # I want y to store the numbers that were left behind after sample()
如果我使用 setdiff() 函数，它将从分数列表中删除所有重复的数字，这不是我想要的。
有人可以给我一些提示吗？
最佳答案
然后不要对值进行采样，而是对索引进行采样
score = c(22,20,30,12,29,21,18,31,27,29,22,48,13,18,10,11,17,10,22,28,14,19,30,22,9)
idx <- sample.int(length(score),size=13,replace=FALSE)
x <- score[idx]
y <- score[-idx]
关于r - 存储sample()函数后剩余的数字，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/29785386/