read.zoo()를 사용하여 R의 html에서 색인화되지 않은 시계열을 읽을 수 있습니까?

Question

나는 사람이 여기에 포함 된 같은 데이터 계열을 찾고 있어요 :

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의 "start"인수는 무시합니다. 그래서

, 나는 ... 다음과 같이 인덱스를 변경

index(beard) <- as.Date(paste(seq(1866,1911, by=1),'-01-01',sep=''), format="%Y-%m-%d") 

이것을 읽는 좋은 해결책을 가지고 있습니다 ...하지만 나를 내버려 read.zoo()의 인수가이 있다면이 야바위꾼 것 이 전화를 한 번에. 나는 그것을 놓치고 있는가, 아니면 두 단계의 문제입니까?

Answer 1

다음과 같이 정의 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)