我正在使用几个线性回归模型。
我想用不同的 30 set.seed 运行线性回归模型
为了澄清起见，我只与两个回归模型和 10 个 set.seed 共享代码（在我的项目中，我有 12 个回归模型，每个模型都应该使用 30 个不同的 set.seeds 运行）
我需要一个解决方案，我可以为一个线性回归模型运行 30 个 set.seed，这样我就可以在运行期间离开我的笔记本电脑 (30 set.seeds)。然后我对第二个回归模型做了同样的事情。
有没有办法在 30 个不同的 set.seed 上自动运行代码。所以我得到了每个 set.seed 的结果。
我希望一切都清楚，我很乐意澄清更多。
笔记
请记住，每个回归模型都有四个相关的块。因此，对 set.seed 或 creatFolds 的任何更改都可能影响其他块。
编辑1
该数据集用于
wdbc <- read.delim("airfoil_self_noise.dat",header=F)
wdbcc=as.data.frame(scale(wdbc))
#set.seed(1)
#set.seed(2)
#set.seed(3)
#set.seed(4)
...
k = 30
folds <- createFolds(wdbcc$V6, k = k, list = TRUE, returnTrain = TRUE)
## Ordinary Least Square regression ##
#Block A
lm = list()
for (i in 1:k) { …