从 R 中的 "lm"对象恢复数据？

Question

我想知道是否有办法重新获取(恢复) jen 的数据从 lm 的输出R 中的对象假设我们不知道该人的名字是什么，但只知道 jen 的角色作为预测器？

换句话说，如何从 lm 重新获取预测数据对象？

这是数据:

q = data.frame(bob = 1:5 - 3, jen = c(1.7, 2.6, 2.5, 4.4, 3.8) - 3)
m <- lm(bob ~ jen, q)

这是我尝试过但没有成功的方法:

eval(names(m$coefficients)[2])

Answer 1

是的，这是可能的:

m$model[, 2]
# [1] -1.3 -0.4 -0.5  1.4  0.8

或者，如果您还想查看名称，

m$model[, 2, drop = FALSE]
#    jen
# 1 -1.3
# 2 -0.4
# 3 -0.5
# 4  1.4
# 5  0.8

或

q[[names(m$model)[2]]]
# [1] -1.3 -0.4 -0.5  1.4  0.8
q[, names(m$model)[2]]
# [1] -1.3 -0.4 -0.5  1.4  0.8
q[, 2]
# [1] -1.3 -0.4 -0.5  1.4  0.8
q[[2]]
# [1] -1.3 -0.4 -0.5  1.4  0.8
q[, names(m$model)[2], drop = FALSE]
#    jen
# 1 -1.3
# 2 -0.4
# 3 -0.5
# 4  1.4
# 5  0.8
q[, 2, drop = FALSE]
#    jen
# 1 -1.3
# 2 -0.4
# 3 -0.5
# 4  1.4
# 5  0.8