我使用gather_predictions() 将几个预测添加到我的数据框中。稍后,也许在做了一些可视化之后,我想添加一个新模型的预测。我似乎无法弄清楚如何做到这一点。
我尝试使用 add_predictions() 和 gather_predictions() 但是当我只想添加其他行时,它们添加了全新的列。
library(tidyverse)
library(modelr)
#The 3 original models
mdisp = lm(mpg ~ disp, mtcars)
mcyl = lm(mpg ~ cyl, mtcars)
mhp = lm(mpg ~ hp, mtcars)
#I added them to the data frame.
mtcars_pred <- mtcars %>%
gather_predictions(mdisp, mcyl, mhp)
#New model I want to add.
m_all <- lm(mpg ~ hp + cyl + disp, mtcars)