# NOT RUN {
y <- tsmeasures(dat0, window = 48)
# Add mean and variance to the "features" matrix
avg <- colMeans(dat0)
variance <- apply(dat0, 2, var)
y <- cbind(y, avg, variance)
class(y) <- c("features", "matrix")
# }
Run the code above in your browser using DataLab