为什么cv.glmnet parallel = TRUE不起作用

Question

我正在尝试并行运行glmnet交叉验证。并行版本和非并行版本之间的经过时间没有显着差异

我已经尝试使用Windows 7企业笔记本电脑（8核）和Windows服务器（24核）。

library(doParallel)
library(glmnet)
no_cores <- detectCores() - 1
print(no_cores)
cl <- makeCluster(no_cores)
registerDoParallel(cl)

x = matrix(rnorm(1e5 * 300), 1e5, 300)
y = rnorm(1e5)
system.time(cv.glmnet(x,y,parallel=TRUE))  # this is parallel
stopCluster(cl)
system.time(cv.glmnet(x,y))                # not parallel

这是平行的

   user  system elapsed 
  18.16   46.76   79.45 

不平行

system.time(cv.glmnet(x,y))                
   user  system elapsed 
  75.36    2.75   78.10