number_of_cores <- 20 > clusters <- parallel::makeCluster(number_of_cores) > doParallel::registerDoParallel(clusters) > registerDoPa