r - 填充年月周缺失值（tsibble）

Question

我想创建一个年-月-周形式的日期列。我在做

BD <- within(BD, date <- sprintf("%d-%02d-%d", year, month,week))
BD$date <- as.Date(BD$date)

然后 apply fill_gaps()，但它将日期作为年月日并填写比要求更多的 NA。我希望以年-月-周格式检测到该日期。