如何绘制重复的随机样本而没有在基础R中绘制两次相同样本的风险？

Question

从群体中抽取随机样本的好方法是什么，没有两次绘制相同样本集的风险，并且在统计上也是合理的？我想在基地R做这个，没有包。我也希望结果可以重复。

这会有效吗？

1. set.seed(1) #this种子是任意选择的
2. 从set.seed(1)随机抽取1000个数字以创建一个向量（命名为 data100numbers）1000个随机种子
3. 将1000个随机数输入一个类似这样的循环：

for (i in 1:1000) {
    x = data100numbers[i]
    set.seed(x)
    index <- sample(1:nrow(data),round(nrow(data))*2/3)
    #etc...more code that does stuff once I draw my random sample
    }

谢谢！