Используя этот подход, вы можете получить коэффициент корреляции.Пожалуйста, данные являются только репрезентативными.
library(Rweka)
iris1<-as.data.frame(iris)
set.seed(456)
mytrain<-createDataPartition(iris$Sepal.Length,p=0.8,list=F)
trainme<-iris[mytrain,]
mymodel<-train(Sepal.Length~.,trainme,trControl=trainControl(method="cv",number=5),method="M5",
metric="MAE")
Просто позвонив, вы получите коэффициент корреляции.
summary(mymodel)