Repeated k-fold CV loop in R to capture metrics

Question

I\'m relatively new to R, and as an exercise I\'m looking to run k-fold CV 50 times in a loop. The error I am getting is "number of items to replace is not a multiple o