Сначала создайте некоторые данные:
Lines <- "Date 06:00 07:00 08:00
01.11.2011 1 4 42
02.11.2011 6 2 21"
DF <- read.table(text = Lines, header = TRUE, check.names = FALSE)
Теперь создайте объект зоопарка z
, используя chron
дата / время:
library(zoo)
library(chron)
tt <- as.chron(outer(DF[[1]], names(DF)[-1], paste), format = "%d.%m.%Y %H:%M")
z <- zoo(c(as.matrix(DF[-1])), tt)
(Замена as.chron
на as.POSIXct
даст POSIXct дату / время.)