Comment calculer la statistique R au carré ( ) dans R pour et / ou la sortie de fonction? Par exemple pour ces données:loess
predict
cars.lo <- loess(dist ~ speed, cars)
cars.lp <- predict(cars.lo, data.frame(speed = seq(5, 30, 1)), se = TRUE)
cars.lp
a deux tableaux fit
pour le modèle et se.fit
pour l'erreur standard.
Réponses:
Ma première pensée a été de calculer une pseudoR2 mesure R 2 comme suit:
Ici, nous obtenons une valeur de 0,6814984 ( ), proche de ce qui serait obtenu à partir d'un GAM :≈
cor(cars$dist, predict(cars.lo))^2
loess
Multiple R-squared
airquality
air
loess
span
la source