2012-01-28 27 views
7

我可以使用summary(fm1)從nlme摘要中提取固定效果。但掙扎如何得到Random effects:部分。從nlme摘要中提取隨機效果

fm1 <- lme(distance ~ age, Orthodont, random = ~ age | Subject) 
summary(fm1) 
Linear mixed-effects model fit by REML 
Data: Orthodont 
     AIC  BIC logLik 
    454.6367 470.6173 -221.3183 

Random effects: 
Formula: ~age | Subject 
Structure: General positive-definite, Log-Cholesky parametrization 
      StdDev Corr 
(Intercept) 2.3270340 (Intr) 
age   0.2264278 -0.609 
Residual 1.3100397  

Fixed effects: distance ~ age 
       Value Std.Error DF t-value p-value 
(Intercept) 16.761111 0.7752460 80 21.620377  0 
age   0.660185 0.0712533 80 9.265333  0 
Correlation: 
    (Intr) 
age -0.848 

Standardized Within-Group Residuals: 
     Min   Q1   Med   Q3   Max 
-3.223106086 -0.493761144 0.007316631 0.472151121 3.

Number of Observations: 108 
Number of Groups: 27 

任何幫助將不勝感激。謝謝

回答

9

使用ranef(fm1)來提取每個主題。

更新給代碼從彙總表提取:

>VarCorr(fm1) 
Subject = pdLogChol(age) 
      Variance StdDev Corr 
(Intercept) 5.41508758 2.3270341 (Intr) 
age   0.05126955 0.2264278 -0.609 
Residual 1.71620400 1.3100397 

> temp <- VarCorr(fm1) 
> temp[,2] 
(Intercept)   age Residual 
"2.3270341" "0.2264278" "1.3100397" 

> temp[1,2] 
[1] "2.3270341" 
+0

謝謝您的回答。 'ranef'給出了隨機效果,但是來自'summary(fm1)'的'Random Effects:'中的StdDev部分。 – MYaseen208 2012-01-28 08:42:49

+0

不錯。我正在跟蹤lme對象的print/summary路徑,但在'print.modelStruct'處丟失了。 – 2012-01-28 10:29:02

+0

謝謝,我很欣賞我對答案的反饋,因爲它可以幫助我在未來提供更好的答案。 :) – Michelle 2012-01-28 18:19:04