r_forest_function

rofrest.R

# any idea where i take the data :) 
# but basically, i've taken it from 'data(...)'

rf_caret <- train(Class ~ ., data = train, method = "rf", trControl = 
                    trainControl(method = "repeatedcv", repeats = 5))
rf_importance <- varImpPlot(rf_caret$finalModel)