如何根据日期标准创建训练和测试集

Question

Data Picture

您好，我需要使用 WkBeg < “2015-01-01” 作为训练数据，并且 WkBeg >= “2015-01-01” 用于测试数据。这是我的代码，但我收到错误消息。有人可以帮助我了解我做错了什么吗？

salesdata2 <- pivot_longer(salesdata2, 3:5, names_to = "Product", values_to = "Sales")
View(salesdata2)

#create test and train sets
salesdata2$WkBeg <- as.Date(salesdata2$WkBeg, format = "%m/%d/%Y")
View(salesdata2)
N = as.Date("2015-01-01") #where you want to split
training = salesdata2[WkBeg<N]
test = salesdata2[WkBeg>=N]

Answer 1

您的代码的主要问题是您在尝试拆分数据时缺少逗号。由于 salesdata2 是一个数据框，括号中需要有一个共同点，因为数据框有两个维度（行和列）。像 N 这样的向量只有一维，所以括号中的逗号不起作用。请参阅下文，您应该不会再收到错误消息。

training = salesdata2[WkBeg<N,] test = salesdata2[WkBeg>=N,]