我编写了一个自定义函数,将数据框划分为k个折叠以进行k折交叉验证,并希望打印出折叠的起始和结束索引,以检查分割是否正确完成。我在paste()
循环中使用for
函数。当我运行该函数时,我没有得到任何错误但没有打印出来。当我只将paste()
行复制到终端时,它会正确打印最后一个索引,这表明该函数已正确执行。那么为什么不从函数中打印paste()
行呢?对此我有任何建议,我将不胜感激。
fold_index_counter = function(k, data){
n = nrow(data)
for (i in 1:k){
start = (n*i)/k
end = (n*(i+1))/k-1
paste("Fold no. ", i, " starts at row ", start, " and ends at row ", end, sep = "")
}
}
fold_index_counter(10, dat.cor.trim)