Pikiran pertama saya adalah menghitung ukuran R 2 semuR2 sebagai berikut:
ss.dist <- sum(scale(cars$dist, scale=FALSE)^2)
ss.resid <- sum(resid(cars.lo)^2)
1-ss.resid/ss.dist
Di sini, kami mendapatkan nilai 0,6814984 ( ), dekat dengan apa yang akan diperoleh dari GAM :≈ cor(cars$dist, predict(cars.lo))^2
library(mgcv)
summary(gam(dist ~ speed, data=cars))
Ini juga tampaknya sesuai dengan loess
fungsi S yang akan kembali (saya tidak punya S jadi saya tidak bisa memeriksa sendiri) sebagai Multiple R-squared
. Misalnya, menggunakan airquality
dataset R, yang terlihat sepertiair
loess
R2
Saya harus mencatat bahwa saya tidak menemukan makalah yang berurusan secara khusus dengan itu (ok, itu hanya googling cepat), dan William Cleveland tidak berbicara tentang R2
Namun, saya bertanya-tanya apakah kebebasan yang Anda dapat memilih tingkat perataan (atau jendela span
) tidak menghalangi penggunaanR2