我在R中使用docker save -o <save image to path> <image name>
进行简单的多线性回归。这是一个示例模型:
lm
其中m <- lm(formula = t ~ a + b + 0, data = df1)
,t
和a
是b
中的列。该模型计算2个系数,我们称之为df1
和a.coef
。如果我然后使用此模型预测其他一些数据,比如在b.coef
中,我可以得到预测值,如下所示:
df2
如果我在predict(m, df2)
中也有a
和b
列。它基本上返回
df2
但我想要的是列df2$a * a.coef + df2$b * b.coef
和df2$a * a.coef
。 R对它们求和并给出答案,但我想看看缩放如何影响这些值。
是否有方便的方法在R中执行此操作(尤其是df2$b * b.coef
或lm
),还是我必须自己手动编码?我在predict.lm
中使用了terms
参数,但我无法到达任何地方。
感谢您的帮助!
修改 我写了这个函数:
predict.lm
答案 0 :(得分:0)
试试这个:
sweep(df2, MARGIN = 2, coef(m), '*')
编辑:更具体的解决方案:
sweep(df2[,c("a","b")], MARGIN = 2, coef(m), '*')