Walczę o konwersjęzoo obiekty do ats obiekt.

Mam ogromny test „data.frame” z kwartalnymi danymi godzinowymi, który wygląda tak:

date <- c("2010-07-04 09:45:00", "2010-07-04 10:00:00", "2010-07-04 10:15:00", "2010-07-04 10:30:00", "2010-07-04 10:45:00", "2010-07-04 11:00:00")
nrv <- c("-147.241", "-609.778", "-432.289", "-340.418", "-73.96" ,  "-533.108")
tt <- c("3510.7", "3608.5", "3835.7", "4003.7", "4018.8", "4411.9")
test <- data.frame(date,nrv,tt)
test

Chcę dokonać pewnych prognoz (głównieARIMA) i pomyślałemforecastpakiet byłby dobrym pomysłem. Najpierw sformatowałem dane z dala od postaci.

test$date <- strptime(test$date,format="%Y-%m-%d %H:%M")
test$nrv <- as.numeric(as.character(test$nrv))
test$tt <- as.numeric(as.character(test$tt))
str(test) #date is POSIXlt object

Ponieważ potrzebowałem wykonać interpolację i opóźnienia konstrukcji, użyłem równieżzoo pakiet używający zmiennej daty jako indeksu, który działał świetnie. The`zoo pakiet polecono mi podczas pracy z danymi szeregów czasowych.

library(zoo)
test.zoo <- zoo(test[,2:3],test[,1])
test.zoo #date is now the Index and and the zoo objects works nicely

Ale potem zdałem sobie sprawę, że prognozowanie wydaje się działaćts przedmioty. (Czy to prawda?)

Kiedy próbowałem przekonwertowaćzoo sprzeciwić sięts obiekt, mój indeks czasu zniknął. Myślę, że może to wynikać z braku odpowiedniej częstotliwości. Jestem jednak trochę zagubiony, jeśli chodzi o częstotliwość roboczą dla tego zestawu danychts obiekty w ogóle.

test.ts <- as.ts(test.zoo)
test.ts

Jak to przekonwertowaćzoo spowrotem do ats obiekt, którego mogę użyć do prognozowania? Dzięki!