如何使for循环中的每个迭代都是唯一的

我试图收集1000个模拟，使用R，在多个样本大小。最终目标是测试均值、中位数和几何均值返回已知答案的能力。首先，我需要从5、30和100个样本大小的正态分布中编码1000个模拟。目前，我的代码打印的每个迭代都完全相同。例如，在打印5个样本的1000次迭代的For循环中，相同的5个数字打印1000次。我如何防止这种情况？我希望每个迭代都是唯一的，这里是代码，变量和循环的总体轮廓对于每个样本大小都是相同的

#Sample Size of 5
oneA <- round(rnorm(5, mean = 5, sd = 1))
oneAVec <- c(oneA)
for (i in 1:1000){
  print(oneAVec)
}

#样本量为5
oneA您只需打印已定义的变量。如果希望每个循环都有新的随机数，请在循环内生成它们

for (i in 1:1000){
  print(round(rnorm(5, mean = 5, sd = 1)))
}

[1] 7 6 7 4 4
[1] 4 4 3 6 4
[1] 5 4 6 5 5
[1] 4 7 3 7 5
[1] 6 4 6 4 5
[1] 4 7 6 4 6
[1] 6 6 3 5 4
[1] 5 4 4 3 5
[1] 6 3 6 6 5
[1] 5 7 4 4 5
[1] 5 5 5 5 5