george berry, kate martin fan
1 year
i learned a new pattern in R, this is the modern tidyverse way to do regressions on subgroups
library(tidyverse)
library(broom)
df %>%
nest(dat=-grouping_col) %>%
mutate(
fit=map(dat, ~lm(y~x, data=.),
tidied=map(fit, tidy)
) %>%
unnest(tidied)