Я пытаюсь решить проблему, обнаруженную в redit, и экспериментировал, как это сделать, используя mtcars набор данных
Это была проблема:
У него есть список, который выглядит следующим образом: https://gyazo.com/0637f2226d8f53db4c90716bd3fb698c с 150 различными "selskapsid".
Он хочет сделать линейную регрессию с "Return12" в качестве зависимой переменной и "SROE", "MktCap" и "y" и независимыми переменными для каждого "Selskapsid". (В основном, построчная регрессия для каждой строки или для каждого идентификатора, даже если идентификатор был повторен, я хочу отдельную модель.)
Я прочитал комментарии, в которых не нашел никакого отличного решения, поэтому я пытался использовать dplyr и пакует то, что мне немного комфортно, но проблема, с которой я столкнулся, заключается в том, что значения cyl зависят от факторов, поэтому при попытке построить модель значение cyl не повторяется.
Кто-нибудь знает простой цикл для достижения этой цели? Я хочу проводить обучение и тестирование в том же цикле, что и результаты обучения не были получены должным образом.
Используя эти библиотеки, я делал это:
library(tidyverse)
library(broom)
mtcars %>%
nest(-cyl) %>%
mutate(fit <-map(data, ~ lm(mpg ~ hp + wt + disp, data = .)),
results = map(fit, augment)) %>%
unnest(results)