将星期数转换为日期，将星期数添加到今天的日期

Question

很抱歉，已被多次询问，但没有任何回复对我有用。我正在尝试使用as.Date函数将周号转换为日期或理想的月份名称。但是，无论我在哪个星期都可以得到相同的结果，而我却无法弄清楚为什么。感谢您的帮助

method_missing': undefined local variable or method

即使我更改年份，它也会产生相同的输出。似乎是将今天的日期（第13个）添加到星期数中。最令人沮丧的是，这是一个旧代码，到昨天为止，它一直运行良好。

Answer 1

从帮助中：“如果日期字符串未完全指定日期，则返回的答案可能是特定于系统的。最常见的行为是假定缺少的年份，月份或日期是当前年份。” / p>

解决这个问题的最简单方法是指定日期，然后进行转换：

 as.Date(x = paste(3, "0"), format = "%W %w")
[1] "2019-01-15"

 as.Date(x = paste(10, "0"), format = "%W %w")
[1] "2019-03-04"

如果从当前年份更改年份，则还需要指定年份。

as.Date(x = paste(10, "0 2018"), format = "%W %w %Y")
[1] "2018-03-04"

在上述示例中，您可以用vector代替3或10。