la fonction predict

Bonjour à tous,

J'ai un souci avec la fonction 'predict' du package e1071. En sorti j'obtient un résultat à 48 observations alors que mon data en contient 20.

voyez-donc:

Code:

---

1 2 3 4 5 6

train<-sample(seq(68), 48, replace=FALSE) dim(forismay[train,]) [1] 48 12 dim(forismay[-train,]) [1] 20 12

---

J'utilise le data.frame forismay[train,] comme donné d'apprentissage pour mon modèle, et forismay[-train,] comme test du modèle.

Code:

---

1 2 3 4 5 6

svm.mod<-svm(cover~hight, data=forismay[train,]) prediction<-predict(svm.mod, data=forismay[-train,]) data.mod<-as.data.frame(prediction) dim(data.mod) [1] 48 1 #ici il devrait afficher 20 1 vu que dim(forismay[-train,]) contient 20 lignes

---

lorsque j'utilise l'objet prediction pour calculer le R² par exemple, les jeux de données valeurs réel et valeurs prédites ne correspondent pas.

Code:

---

1 2 3 4

reg<-lm(forismay[-train,]$cover~prediction) Error in model.frame.default(formula = forismay[-train, ]$cover ~ prediction, : les longueurs des variables diffèrent (trouvé pour 'prediction')

---

Je ne vois pas où se situe le problème.

Merci.

Bonjour,

Ca ne fonctionne pas parce que l'argument de la fonction predict n'est pas 'data' mais 'newdata'. Si newdata n'est pas renseigner alors il prédira les valeurs pour les observations qui ont servi à la calibration du modèle :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

x <- 1:10 y <- 3*x-2+rnorm(10,0,1.25)   tab <- data.frame(x = x , y = y) rm(x,y) lm1 <- lm(y ~ x, data = tab, subset = !(x%in%c(4, 8))) length(predict(lm1)) [1] 8 length(predict(lm1, newdata = tab[tab$x %in% c(4, 8),])) [1] 2 length(predict(lm1, data = tab[tab$x %in% c(4, 8),])) [1] 8

---

cdlt

Dire que c'était si simple:ptdr:

merci, Tototode.