Используйте MASS :: stepAIC в мурлыканье - PullRequest
Новая
       21

Используйте MASS :: stepAIC в мурлыканье

0 голосов
/ 05 апреля 2019

Я пытаюсь применить функцию MASS :: stepAIC () к списку моделей.Я не могу понять, как это работает, используя purrr :: map ().

library(tidyverse)
library(MASS)

# Define function
cyl_fn <- function(df1){
     glm(cyl ~ drat + gear + carb, family = "poisson", data = df1)
}

# Nest data frame by vs
nested_cyl <- mtcars %>%
    group_by(vs) %>%
    tidyr::nest() 

# Fit model 
test <- nested_cyl %>%
    mutate(model_cyl = map(data, cyl_fn)) %>%
    mutate(model_cyl_aic = map(model_cyl, stepAIC))

Это приводит к следующей ошибке: 

Error in is.data.frame(data) : object 'df1' not found

Как использовать функцию stepAIC в функции карты?

...