計算價格彈性
既然你已經了解價格彈性，我們來看看大都會地區的高階產品，價格有多「有彈性」吧！訓練與驗證資料集已為你建立好，分別存在 bev_xts_train 與 bev_xts_valid 物件中。
你已經在工作空間中載入高階產品的銷量變數 MET_hi。你需要先從 bev_xts_train 物件中擷取價格資料。bev_xts_train 中價格的欄位名稱是 MET.hi.p。
本練習屬於課程
用 R 預測產品需求
練習說明
- 將高階產品（
MET.hi.p）的價格取對數後，儲存為向量。 - 將銷量的對數與價格的對數載入到一個 data frame 中。
- 建立即回歸模型，以價格的對數預測銷量的對數。
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
# Save the prices of each product
l_MET_hi_p <- as.vector(___(bev_xts_train[,"___"]))
# Save as a data frame
MET_hi_train <- data.frame(as.vector(log(MET_hi)), l_MET_hi_p)
colnames(MET_hi_train) <- c("log_sales", "log_price")
# Calculate the regression
model_MET_hi <- lm(___ ~ ___, data = ___)