Это предварительный ответ, учитывая, что именно то, что вам нужно, не совсем понятно.
Если мы предположим, что фрейм данных примерно такой же, как у вас, и предположим, что $price
- это переменная результата, которую вы хотитеЧтобы объяснить и что существует некоторая объяснительная (независимая) переменная, называемая $indep_var
, мы получаем это:
df <- data.frame(
product = c("A", "A", "B", "C", "A", "B", "A", "C", "A", "B"),
price = c(sample(20, 10)),
indep_var = c(sample(10))
)
На основании этих данных и этих предположений вы можете определить цикл for
для получения линейногорегрессионные модели для каждого продукта:
regressions <-c()
for(i in unique(df$product)){
regressions[i] <- lm(df[df$product==i,]$price ~ df[df$product==i,]$indep_var)
}
regressions