我想提取使用 lmer() 完成的回归的标准误差。例如,
library(lme4)
data(iris)
head(iris)
model <- lmer(Sepal.Length ~ Sepal.Width + (1 | Species), data=iris);
summary(model)
Run Code Online (Sandbox Code Playgroud)
查看摘要的固定效应,您可以看到标准误差。
Fixed effects:
Estimate Std. Error t value
(Intercept) 3.4062 0.6683 5.097
Sepal.Width 0.7972 0.1062 7.506
Run Code Online (Sandbox Code Playgroud)
我想把它拉出来而不是手动输入。
summary(model)$coef[, 2, drop = FALSE]
Run Code Online (Sandbox Code Playgroud)
或者
sqrt(diag(vcov(model)))
Run Code Online (Sandbox Code Playgroud)