## 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
## Mathematical Operations: | +/- * ^ ... -
TS^2
TS[2:4]
OR = returns(TS)
OR
OR > 0
Run the code above in your browser using DataLab