计算价格弹性
既然您已经了解了价格弹性，接下来看看大都市地区的高端产品价格有多"富有弹性"吧！训练集和验证集已经为您准备好，分别保存在对象 bev_xts_train 和 bev_xts_valid 中。
高端产品的销量已加载到工作区，变量名为 MET_hi。您需要先从 bev_xts_train 对象中提取价格。bev_xts_train 中价格列的列名是 MET.hi.p。
本练习是课程的一部分
使用 R 预测产品需求
练习说明
- 将高端产品价格（
MET.hi.p）取对数，并保存为一个向量。 - 将销量的对数与价格的对数加载到一个数据框中。
- 构建回归模型，用价格的对数来预测销量的对数。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# 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 = ___)