package multicore -> package parallel

This commit is contained in:
Francois Pelletier 2014-10-13 12:10:37 -04:00
parent 0a2c687323
commit f65ad0c877
4 changed files with 20 additions and 2 deletions

View file

@ -24,7 +24,7 @@ cftocdf <- function(grid,char.fun,...,wmin=0,wmax=50,MSwindows=FALSE)
# Integrate for each grid point using parallel computation if available
if(!MSwindows)
{
return(unlist(multicore::mclapply(grid,
return(unlist(mclapply(grid,
function(x) 1/2-1/pi*
integrate(integrand,wmin,wmax,x,char.fun,...)$value)))
}