showClass("trip")
d <- data.frame(x=1:10, y=rnorm(10), tms=Sys.time() + 1:10, id=gl(2, 5))
tr <- trip(d)
summary(tr)
plot(tr)
lines(tr)
dim(tr)
names(tr)
subset(tr, id == "2")
as.data.frame(tr)
tr[1:3, ]
tr[, 1]
tr[[1]]
Run the code above in your browser using DataLab