R的周日期

Question

在R中，如何将字符串1/2010（2010年第1周）转换为Date或POSIXct（或POSIXlt）对象？

我试过

as.Date('1/2010', "%W/%Y")
[1] "2010-06-29"

我也试过

strptime('1/2010', "%W/%Y")
[1] "2010-06-29 BRT"

但这些显然不是我想要的。

最后，我觉得选择哪个确切并不重要，只要我可以正确地将其重新转换为＆＃34;起源后的周数＆＃34;。

Answer 1

library(splitstackshape)

date <- c("1/2013","3/2013")
date = data.frame(date)

df = data.frame(cSplit(date,"date","/"))

colnames(df) = c("week", "year")

df$date = as.Date(paste(df$year, df$week, 1, sep="-"), "%Y-%U-%u")