我有以下线性模型
library(nlme)
fm2 <- lme(distance ~ age + Sex, data = Orthodont, random = ~ 1)
fm2.lm <- lm(distance ~ age + Sex,data = Orthodont)
如何获得年龄和性别距离的标准误差？
问问题
670 次
2 回答
1
对于fm2（线性混合模型），你可以做
sqrt(diag(summary(fm2)$varFix))
#(Intercept) age SexFemale
# 0.83392247 0.06160592 0.76141685
对于fm2.lm（线性模型），你可以做
summary(fm2.lm)$coefficients[, "Std. Error"]
#(Intercept) age SexFemale
# 1.11220946 0.09775895 0.44488623
于 2016-09-02T08:29:09.260 回答
0
见attributes(summary(your.model))。你所追求的是summary(your.model)$coefficients（或者我把你的问题弄错了吗？）。只需使用子集[]来获得你想要的
于 2014-03-10T10:23:46.877 回答