rsample::pretty.vfold_cv(rs) #转换成caret格式 rs_caret = rsample::rsample2caret(rs) #wrapper,这个过程就相当于python里的test harness car = function( method, recipe, rsample, data){ car = caret::train( recipe , data , method = method , trControl = caret::trainControl(index = rsampl...