# NOT RUN {
# }
# NOT RUN {
data(exrates)
dat <- logret(exrates$USD, demean = TRUE) ## de-meaned log-returns
res <- svsample(dat) ## run MCMC sampler
plot(res, forecast = 100) ## display results
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab