R语言生成预测用未来日期与维度全组合数据集

你需要生成日期、渠道、产品三个字段的笛卡尔积全组合，直接用全组合生成函数即可，不需要手动写重复日期的逻辑，两种常用实现方式如下：

方法1：基础R实现（无第三方包依赖） #

用R内置的expand.grid函数生成所有维度的全组合，代码如下：

# 1. 生成未来45天日期序列
# 注：如果不需要包含训练集最后1天的历史日期，可将max(train$Date)改为max(train$Date)+1
Dates <- seq(max(train$Date), by = "day", length.out = 45)

# 2. 定义维度取值，也可以直接从训练集提取唯一值，避免手动输入错误
Channel <- unique(train$Channel) # 共4个取值
Product <- unique(train$Product) # 共7个取值

# 3. 生成三列全组合数据框
future_df <- expand.grid(
  Dates = Dates,
  Channel = Channel,
  Product = Product
)[, c("Dates", "Channel", "Product")] # 调整列顺序为要求的Dates|Channel|Product

运行后执行nrow(future_df)即可校验行数，正常会返回1260，符合预期行数要求。

方法2：tidyverse生态实现（更简洁） #

如果日常用dplyr/tidyr做数据处理，可以用tidyr::crossing直接生成全组合，返回tibble格式数据：

library(tidyr)
library(dplyr)

future_df <- crossing(
  Dates = seq(max(train$Date), by = "day", length.out = 45),
  Channel = unique(train$Channel),
  Product = unique(train$Product)
) %>%
  select(Dates, Channel, Product)

注意：如果从训练集自动提取Channel、Product的唯一值，建议先执行length(unique(train$Channel))和length(unique(train$Product))校验取值数量，确认分别为4、7，避免训练集存在缺失维度值导致最终组合数不符合预期。

内容的提问来源于stack exchange，提问作者VR88