library(CoSMoS)
## define marginal distribution and arguments with target
## autocorrelation structure
x <- generateTS(margdist = 'burrXII',
margarg = list(scale = 1,
shape1 = .75,
shape2 = .25),
acsvalue = acs(id = 'weibull',
t = 0:30,
scale = 10,
shape = .75),
n = 1000, p = 30, p0 = .5, TSn = 3)
## generate new values with same parameters
r <- regenerateTS(x)
plot(r)
Run the code above in your browser using DataLab