将数据随机分为建模组与验证组，为了获得比较好的建模效果，进行1000次随机分组，种子值分别为1:1000，循环1000次，在迭代到i=140报错，循环跳出，第140行及以后没有数值。特向朋友们请教：
1.我想忽略某一次迭代错误，不要跳出循环，继续下一次循环迭代，如何实现？
2.如何将大括号内的部分代码封装成函数，例如:C_index.test <- function(seed=i) {set.seed(i) 其余略}，最后用for (i in 139:141) C_index.test ()的形式调用该函数？我前面尝试过，没有成功。
多谢朋友们！
代码及数据以网盘及附件两种方式提供，选择一种即可。
链接: https://pan.baidu.com/s/18mQ1takpdV24R28g-LyHsA 提取码: apca