# ESS for iid simulations:
rand_iid = rnorm(n = 10^4)
getEffSize(rand_iid)
# ESS for several AR(1) simulations with coefficients 0.1, 0.2,...,0.9:
rand_ar1 = sapply(seq(0.1, 0.9, by = 0.1), function(x) arima.sim(n = 10^4, list(ar = x)))
getEffSize(rand_ar1)
Run the code above in your browser using DataLab