parallel::clusterExport( cl, envir=environment(),
varlist=c("A1","Size","Pi","Rho","mini","maxi","X","Y","tau",
"Rank","m","phi","ncores","verbose") )
parallel::clusterExport( cl, envir=environment(),
varlist=c("A1","Size","Pi","Rho","mini","maxi","X","Y","tau",
"Rank","m","phi","ncores","verbose") )