wait | R Documentation |
The functions call MPI wait functions.
wait(request = .pbd_env$SPMD.CT$request,
status = .pbd_env$SPMD.CT$status)
waitany(count, status = .pbd_env$SPMD.CT$status)
waitsome(count)
waitall(count)
request |
a request number. |
status |
a status number. |
count |
a count number. |
These functions are for internal uses. Potentially, they wait after some nonblocking MPI calls.
An invisible state of MPI call is returned.
Wei-Chen Chen wccsnow@gmail.com, George Ostrouchov, Drew Schmidt, Pragneshkumar Patel, and Hao Yu.
Programming with Big Data in R Website: https://pbdr.org/
## Not run:
### Save code in a file "demo.r" and run with 2 processors by
### SHELL> mpiexec -np 2 Rscript demo.r
spmd.code <- "
### Initialize
suppressMessages(library(pbdMPI, quietly = TRUE))
.comm.size <- comm.size()
.comm.rank <- comm.rank()
### Examples.
N <- 5
x <- (1:N) + N * .comm.rank
if(.comm.rank == 0){
isend(list(x))
}
if(.comm.rank == 1){
y <- irecv(list(x))
}
wait()
comm.print(y, rank.print = 1L)
### Finish.
finalize()
"
# execmpi(spmd.code, nranks = 2L)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.