Apply() on amdahl
It seems this function is properly accelerating computations on gustafson but not on amdahl:
a <- array(10, c(1000,100,100))
system.time(b <- apply(a, c(2,3), mean))
user system elapsed
1.914 27.396 29.339
system.time(b <- Apply(a, c(2,3), "mean", parallel=TRUE))
user system elapsed
1.908 46.335 48.227
Computation times increase instead of decreasing, while on gustafon the same test takes only 10 seconds with Apply(). I didn't test if this issue is also affecting Moore.