## data -
# Create an artificial timeSeries object:
setRmetricsOptions(myFinCenter = "GMT")
charvec = timeCalendar()
set.seed(4711)
data = matrix(exp(cumsum(rnorm(12, sd = 0.1))))
tS = timeSeries(data, charvec, units = "tS")
tS
## "[" -
tS[1:3, ]
## head -
head(tS)
Run the code above in your browser using DataLab