Я новичок в R. Я пытаюсь использовать алгоритм SVM для использования в наборе данных регрессии.У меня есть это:
d1 <- read.table("forestfires.csv", sep=",", header=TRUE)
train<-d1[1:465,]
test <-d1[466:517,]
library(e1071)
sapply(train,summary)
library(caret)
ctrl <- trainControl(method = "cv", savePred=T)
mod <- train(area~., data=d1, method = "svmLinear", trControl = ctrl)
summary(mod)
predict(mod, test)
Это происходит без ошибок.Но я хочу проверить алгоритм.Я попробовал это:
library(crossval)
CVSVMModel = crossval(fit2)
cverror_individual = kfoldLoss(CVSVMmodel,'Mode','individual')
Но я получил эту ошибку:
Error in group.samples(Y) : argument "Y" is missing, with no default`enter code here`
Кто-то знает, что я могу сделать?