## Create an Artificial 'timeSeries' Object
setRmetricsOptions(myFinCenter = "GMT")
charvec <- timeCalendar()
data <- matrix(rnorm(12))
TS <- timeSeries(data, charvec, units = "RAND")
TS
## Coerce to Vector
as.vector(TS)
## Coerce to Matrix
as.matrix(TS)
## Coerce to Data Frame
as.data.frame(TS)
Run the code above in your browser using DataLab