将线性模型应用于嵌套数据

Question

我想将线性模型应用于R中的嵌套数据集。我在代码中遇到错误，无法解决。

country_model <- function(df) {
  lm(lifeExp ~ year, data = df)
}

apminder.model  <- gapminder.nested %>% 
 mutate(model = map(data, country_model), 
        coef = map(model, broom::tidy))

  

mutate_impl（.data，点）中的错误：     评估错误：无法将“闭包”类型强制转换为“字符”类型的向量。

Answer 1

@ANG的注释具有正确的解决方案，该函数前缺少波浪号：

model = map(data, ~ country_model)

您遇到的新错误

## Evaluation error: no recognized region names

是因为您在maps之后加载了purrr程序包，并且屏蔽了map函数。简便的解决方案是使用purrr::map而不是map。