metaseqR (version 1.12.2)

wapply: List apply helper

Description

A wrapper around normal and parallel apply (mclapply or multicore package) to avoid excessive coding for control of single or parallel code execution. Internal use.

Usage

wapply(m, ...)

Arguments

m

a logical indicating whether to execute in parallel or not.

...

the rest arguments to lapply (or mclapply)

Examples

multic <- check.parallel(0.8)
# Test meaningful only in machines where parallel computation 
# supported
if (multic) {
    system.time(r<-wapply(TRUE,1:10,function(x) runif(1e+6)))
    system.time(r<-wapply(FALSE,1:10,function(x) runif(1e+6)))
}