fix sample means example

This commit is contained in:
Garrett Mills 2019-05-01 16:14:48 -05:00
parent cf04b6a15f
commit 5617f1698d

View File

@ -3,7 +3,7 @@ if ( !is.loaded("mpi_initialize") ){
} }
number_of_plots = 5 number_of_plots = 5
nodes = mpi.universe.size() nodes = mpi.universe.size()-1
mpi.spawn.Rslaves(nslaves=nodes) mpi.spawn.Rslaves(nslaves=nodes)
generate_plot <- function(filename){ generate_plot <- function(filename){