1

我有以下线性模型

library(nlme)
fm2 <- lme(distance ~ age + Sex, data = Orthodont, random = ~ 1)
fm2.lm <- lm(distance ~ age + Sex,data = Orthodont)

如何获得年龄和性别距离的标准误差?

4

2 回答 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 回答