## 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