提取R中的系数G值

Question

results <- 

Call:
lm(formula = log(Y) ~ G)

Coefficients:


(Intercept)            G  
     1.6122       0.5647  


$`3388.415_6`

Call:
lm(formula = log(Y) ~ G)

Coefficients:


(Intercept)            G  
      1.994       -2.178  

如何从R中获取G值？

Answer 1

我不确定我是否正确编辑了你的问题，因为代码对我来说没有意义，但也许这有点像预期的答案：

G <- 1:10
Gmod <- lm( rnorm(10) ~ G) ; Gmod
coef(Gmod)["G"]

如果列表结构中有很多模型对象，那么这可能会起作用：

> lapply( list(Gmod, Gmod), function(mdo) coef(mdo)["G"] )
[[1]]
         G 
0.04917535 

[[2]]
         G 
0.04917535 

（它确实让我担心你有浮点数作为列表索引。它表明在前面的步骤中可能出现了问题。）