我的文件有年号和周号,我想知道如何相应地将其读入 ts (即 52 周年)
前任:
Year,Week,Data
2011,1,500
2011,2,600
...
2013,52,700
我的文件有年号和周号,我想知道如何相应地将其读入 ts (即 52 周年)
前任:
Year,Week,Data
2011,1,500
2011,2,600
...
2013,52,700
您可以执行以下操作。关键是使用格式格式解析Year Week
as 。但是您还需要指定星期的开始日期。因此我们使用格式解析。检查更多细节。POSIXct
%Y %U
Year Week 1
%Y %U %u
?strptime
DF <- read.csv(text='Year,Week,Data
2011,1,500
2011,2,600
2013,52,700')
require(xts)
data.xts <- xts(DF$Data, as.POSIXct(paste0(DF$Year, " ", DF$Week, " 1"), format = "%Y %U %u"))
data.xts
## [,1]
## 2011-01-03 500
## 2011-01-10 600
## 2013-12-30 700