R：插入行以查找销售数据中缺失的观察结果[重复]

这可能是重复的。我尝试寻找解决方案，但无法想出一个解决方案，主要是因为我真的不知道如何提出我的问题。所以我将包括一个工作示例：

想象一下我有这个 df：

 df <- x <- data.frame(Product = c("A", "A", "A", "B","B", "C", "C", "C", "C", "C"), Year = c(2014, 2017, 2018, 2017, 2018, 2013, 2014, 2016, 2017, 2018), Sales  = c(4, 2, 3, 5, 1, 3, 3, 4, 7, 5))

我想做的是： 在 2013:2019 范围内，为每年的每种产品添加一行，即使该产品在该年未售出。所以我想要的输出是这样的：

Product   Year   Sales
    A     2013       0
    A     2014       4
    A     2015       0
    A     2016       0
    A     2017       2
    A     2018       3
    A     2019       0

谢谢您的帮助。

我们可以用tidyr::complete

tidyr::complete(df,Product,Year = seq(min(Year), max(Year)), fill=list(Sales = 0))

#  Product  Year Sales
#  <fct>   <dbl> <dbl>
# 1 A        2013     0
# 2 A        2014     4
# 3 A        2015     0
# 4 A        2016     0
# 5 A        2017     2
# 6 A        2018     3
# 7 B        2013     0
# 8 B        2014     0
# 9 B        2015     0
#....

如果必须固定范围（2013:2019）无论数据的年份如何，我们都可以明确指定它。

tidyr::complete(df, Product, Year = 2013:2019, fill = list(Sales = 0))