powered by
evmSim
evmSimSetSeed(x)
evm
method = "simulate"
# data <- rnorm(1000) # mod <- evm(data, qu=.7, method="simulate") # evmSimSetSeed(mod) # mod1 <- evm(data, qu=.7, method="simulate") # this produces the same MCMC output as mod
Run the code above in your browser using DataLab