決定係数（R二乗）の利用

rstanarm で学ぶベイズ回帰モデリング

Jake Thompson

Psychometrician, ATLAS, University of Kansas

R二乗とは？

決定係数

R二乗とは？

決定係数

R二乗とは？

決定係数

R二乗の計算

lm_model <- lm(kid_score ~ mom_iq, data = kidiq)
lm_summary <- summary(lm_model)
lm_summary$r.squared

0.2009512

ss_res <- var(residuals(lm_model))
ss_total <- var(residuals(lm_model)) + var(fitted(lm_model))
1 - (ss_res / ss_total)

0.2009512

ベイズモデルのR二乗

stan_model <- stan_glm(kid_score ~ mom_iq, data = kidiq)

ss_res <- var(residuals(stan_model))
ss_total <- var(fitted(stan_model)) + var(residuals(stan_model))
1 - (ss_res / ss_total)

0.2004996

lm_summary$r.squared

0.2009512

練習しましょう！

rstanarm で学ぶベイズ回帰モデリング