### SHELL> mpiexec -np 4 Rscript --vanilla [...].r
suppressMessages(library(pbdMPI, quietly = TRUE))
suppressMessages(library(pbdSLAP, quietly = TRUE))
init()
slap.init.grid(2, 2, ictxt = 0)
comm.print(.pbd_env$.__grid_info_0, all.rank = TRUE)
slap.exit.grid(0)
slap.init.grid(2, 3, ictxt = 1)
comm.print(.pbd_env$.__grid_info_1, all.rank = TRUE)
slap.exit.grid(1)
slap.finalize()
finalize()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.