parallel_readme
provide framework for parallel
parallel_readme()
scripts for initialization
parallel_readme()
#>
#> n.cores <- parallel::detectCores() - 1
#> #create the cluster
#> my.cluster <- parallel::makeCluster(
#> n.cores,
#> type = "PSOCK"
#> )
#> doParallel::registerDoParallel(cl = my.cluster)
#>
#> system.time(
#> res <- foreach(
#> i = 1:length(data_list), # index
#> j = data_list, # content
#> .packages = c("dplyr","purrr") # your required packages
#> ) %dopar% {
#>
#> # load(your_custom_script.R)
#> # or define it here function(i,j){}
#>
#> # action for each list element in the loop
#> # j[[i]] %>% ...
#> }
#> )
#>
#> doParallel::stopImplicitCluster()
#>