# NOT RUN {
eList <- Choptank_eList
# }
# NOT RUN {
#Run an estimation adjusting windowQ from default:
eList <- modelEstimation(eList, windowQ=5)
library(doParallel)
nCores <- parallel::detectCores() - 1
cl <- makePSOCKcluster(nCores)
registerDoParallel(cl)
eList <- modelEstimation(eList, windowQ=5, run.parallel = TRUE)
stopCluster(cl)
# }
Run the code above in your browser using DataLab