I'm trying to run a small test of %dopar% and it always comes out slower.. Here's some dummy code and output. I'm running this on win7x64 core i7-2600k...
library(foreach)
library(doSNOW)
registerDoSNOW(makeCluster(3, type = "SOCK"))
N <- 3*(10^4)
system.time(foreach(i = 1:N) %do% {sum(rnorm(N))})
system.time(foreach(i = 1:N) %dopar% {sum(rnorm(N))} )
Here's the output:
> system.time(foreach(i = 1:N) %do% {sum(rnorm(N))})
user system elapsed
90.39 0.00 90.42
> system.time(foreach(i = 1:N) %dopar% {sum(rnorm(N))} )
user system elapsed
17.00 0.89 177.11