Fonction pour sur échantillon de tester un modèle linéaire

Question

Quelqu'un peut-il me recommander une fonction en R avec laquelle je peux calculer le R-carré hors échantillon d'un modèle linéaire précédemment calculé lm(). Cordialement et merci d'avance!

Answer 1

Vous pouvez utiliser le format suivant:

# Fit model 
model.lm <- lm(Sepal.Length ~ Petal.Length, data = iris[1:75,]) 

# Predict data for some new data 
pred.dat <- predict(model.lm, newdata = iris[76:150,]) 

# Calculate correlation between predicted values for new data and actual values, then square 
cor(iris[1:75,"Sepal.Length"], pred.dat)^2 

Vous pouvez emballer tout dans une fonction si vous le souhaitez. Si vous avez besoin d'aide, il suffit de demander.

Vive

Felipe