diff --git a/demos/sample_means/plots/bob.jpg b/demos/sample_means/plots/bob.jpg
new file mode 100644
index 0000000..54a3bef
Binary files /dev/null and b/demos/sample_means/plots/bob.jpg differ
diff --git a/demos/sample_means/slurm_generate_plots.R b/demos/sample_means/slurm_generate_plots.R
new file mode 100644
index 0000000..eb3d59d
--- /dev/null
+++ b/demos/sample_means/slurm_generate_plots.R
@@ -0,0 +1,11 @@
+arg = commandArgs(TRUE)
+
+samples = rep(NA, 100000)
+for ( i in 1:100000 ){ samples[i] = mean(rexp(40, 0.2)) }
+
+jpeg(paste('plots/', arg, '.jpg', sep=""))
+
+hist(samples, main="", prob=T)
+lines(density(samples), col="darkblue", lwd=3)
+
+dev.off()
diff --git a/demos/sample_means/slurm_submit_generate_plots.sh b/demos/sample_means/slurm_submit_generate_plots.sh
index 9584c63..32fee31 100644
--- a/demos/sample_means/slurm_submit_generate_plots.sh
+++ b/demos/sample_means/slurm_submit_generate_plots.sh
@@ -1,8 +1,8 @@
 #!/bin/bash
-#SBATCH --ntasks=5
+#SBATCH --ntasks=6
 
 cd $SLURM_SUBMIT_DIR
 
 mkdir plots/
 
-mpiexec -n 1 R --vanilla -f generate_plots.R
+R --vanilla -f slurm_generate_plots.R --args "plot$SLURM_ARRAY_TASK_ID"