и явно ссылаться на соответствующие данные:
у обновитьlm-модель с использованиемupdate-функция внутриmap-call, но это выдает следующую ошибку:
mtcars %>% group_by(cyl) %>%
nest() %>%
mutate(lm1 = map(data, ~lm(mpg ~ wt, data = .x)),
lm2 = map(lm1, ~update(object = .x, formula = .~ . + hp)))
Error in mutate_impl(.data, dots) :
Evaluation error: cannot coerce class ""lm"" to a data.frame.
Может кто-нибудь помочь мне с этой проблемой? Я запутался в этой ошибке, потому что, например, это работает совершенно нормально:
mtcars %>% group_by(cyl) %>%
nest() %>%
mutate(lm1 = map(data, ~lm(mpg ~ wt, data = .x)),
lm2 = map_dbl(lm1, ~coefficients(.x)[1]))