inst/tests/gather.r

suppressPackageStartupMessages(library(pbdMPI, quietly=TRUE))

testval <- length(allgather(comm.rank()))
trueval <- comm.size()

if (comm.rank()==0) testval == trueval

finalize()

Try the pbdMPI package in your browser

Any scripts or data that you put into this service are public.

pbdMPI documentation built on Sept. 10, 2023, 5:06 p.m.