Alternative a group_map

Question

Sono curioso di sapere quale sarebbe il codice R di base e il data.tablecodice che fanno lo stesso lavoro group_mapdi dplyr?

Ad esempio, come realizzare questo codice utilizzando R e data.tablecodice di base ?

iris %>%
     group_by(Species) %>%
     group_map(~ lm(Petal.Length ~ Sepal.Length, data = .x))

Grazie molto!

MODIFICA Vorrei convertire l'intero codice sopra in uno con il codice R di base e quindi, se possibile, sbarazzarmi anche di group_bye%>%

Answer 1

Con by e .SD , il codice data.table può funzionare

iris %>% 
  data.table(.) %>% 
  .[, .(list(lm(Petal.Length ~ Sepal.Length, .SD))), by = .(Species)] %>% 
  as.list()

Simile a questa domanda Adatta modello per gruppo utilizzando il pacchetto Data.Table

Il %>% non è necessario,

as.list(data.table(iris)[, .(list(lm(Petal.Length ~ Sepal.Length, .SD))), by = .(Species)])