Як отримати R-квадрат для лесового пристосування?


15

Як обчислити статистику R-квадрата ( ) в R для та / або виводу функції? Наприклад, для цих даних:r2loesspredict

cars.lo <- loess(dist ~ speed, cars)
cars.lp <- predict(cars.lo, data.frame(speed = seq(5, 30, 1)), se = TRUE)

cars.lpмає два масиви fitдля моделі та se.fitдля стандартної помилки.


У лінійній регресії дорівнює кореляції у квадраті між спостережуваними величинами та встановленими значеннями - як щодо цього? R2
Макрос

Відповіді:


10

Першою моєю думкою було обчислити псевдомір R2 таким чином:

ss.dist <- sum(scale(cars$dist, scale=FALSE)^2)
ss.resid <- sum(resid(cars.lo)^2)
1-ss.resid/ss.dist

cor(cars$dist, predict(cars.lo))^2

library(mgcv)
summary(gam(dist ~ speed, data=cars))

loessMultiple R-squaredairqualityairloessR2

введіть тут опис зображення

R2

spanR2


8
R2R2

r2

3
Не обов’язково "точніше". Дійсно, використовувати Лоссе для досягнення точності в прогностичній моделі було б безглуздо. Я думаю, що посилання на Лосса як «модель» передає можливе непорозуміння щодо того, як вона працює та як її планують використовувати: це дійсно графічний інструментарій, який допомагає побачити закономірності та тенденції. Оскільки це дійсно просто плавніше рухоме вікно, воно виступає як досить складна модель просторового сусідства, в якій встановлене значення в точці залежить від того, які сусідні точки існують у наборі даних та від значень там.
whuber

2
r2
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.