MuMIn
R
21
#load packages
library(lme4)
library(MuMIn)
#Fit Model
m <- lmer(mpg ~ gear + disp + (1|cyl), data = mtcars)
#Determine R2:
r.squaredGLMM(m)
R2m R2c
0.5476160 0.7150239
Output untuk fungsi r.squaredGLMM
menyediakan:
Catatan: komentar pada posting blog tertaut menunjukkan bahwa pendekatan alternatif yang diilhami Nakagawa & Schielzeth yang dikembangkan oleh Jon Lefcheck (menggunakan sem.model.fits
fungsi dalam piecewiseSEM
paket) menghasilkan hasil yang identik. [Jadi Anda punya opsi: p].
1: Nakagawa, S., dan Schielzeth, H. 2013. Metode umum dan sederhana untuk mendapatkan R2 dari model efek campuran linier umum. Metode dalam Ekologi dan Evolusi 4 (2): 133-142.
2: Johnson, PCD 2014, ekstensi R2GLMM Nakagawa & Schielzeth ke model lereng acak. Metode dalam Ekologi dan Evolusi 5: 44-946.