Nothing
### To disable "rlecuyer" loading in "pbdMPI::.onLoad()" because
### an spmd_bcast() call is needed to get the parallel RNG working in the
### "pbdMPI::.onLoad()" function.
.Random.seed <- NULL
library(pbdMPI, quietly = TRUE)
### To be consistent with "a.c".
cat("[R] size: ", comm.size(), ", rank: ", comm.rank(), "\n", sep = "")
finalize()
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.