我正在寻找像这里包含的数据系列:
http://robjhyndman.com/tsdldata/roberts/beards.dat
...并将其加载到R中的动物园时间序列对象中。没有日期信息表,但它列出了它是常规的,年度的,并且从y = 1866开始。这就是我正在尝试的......
beard <- read.zoo('http://robjhyndman.com/tsdldata/roberts/beards.dat',
header=FALSE,
index.column=0,
start="1866-01-01",
format="%Y",
skip=4)
它主要起作用,但忽略了zooreg的“开始”参数。
所以,我有一个很好的解决方案,读取这个,然后像这样改变索引......
index(beard) <- as.Date(paste(seq(1866,1911, by=1),'-01-01',sep=''), format="%Y-%m-%d")
...但如果read.zoo()
中有一个让我在一次通话中执行此操作的参数,这将会更加流畅。我错过了,还是两步问题?
答案 0 :(得分:5)
像这样指定自定义FUN=
:
URL <- 'http://robjhyndman.com/tsdldata/roberts/beards.dat'
toDate <- function(x) as.Date(as.yearmon(x) + 1865)
beard <- read.zoo(URL, index = 0, skip = 4, FUN = toDate)