R - LM 模型，用于预测 10 家商店的销售情况

Question

请帮我做作业。我有一个数据集，其中包含有关 10 家不同商店的销售信息。我应该预测 2 个月的销售情况。对于我的模型，我使用了"开放"列 - 商店在哪一天开门或关门;和"促销" - 如果商店有促销活动。 我构建了一个 lm 模型：

m.s<-lm(Sales~Open+Promo, data)
sale<-predict(m.s, newdata, ...)

此模型

适用于 1 家商店，但我如何为所有 10 家商店构建此模型并预测销售额？

我个人的想法是这样的：

bn<- for(Store in 1:10 )
  {m.sales7<-lm(Sales~Open+Promo, data)}

但它不起作用/

Answer 1

如果没有看到您的数据，我无法帮助您进行实际建模，但您的循环应该看起来像这样：

for(Store in 1:10 ) {
   model[Store] <- lm(Sales~Open+Promo, data)
}

这将创建所有商店模型的矢量。请务必在每次迭代时更改数据源 ( data (，以匹配正确的存储数据。同样，如果没有看到您的数据，我无法真正帮助您进行设置。

要运行预测，请使用 model[1] ... model[10] .