为什么使用％do％循环使用多个处理器？预期的顺序循环

Question

我正在使用foreach并阅读它，例如

• https://www.r-bloggers.com/the-wonders-of-foreach/
• https://www.rdocumentation.org/packages/foreach/versions/1.4.3/topics/foreach

我的理解是，您可以使用%dopar%进行并行处理，使用%do%进行顺序处理。

碰巧我遇到%dopar%的问题，在尝试调试时，我将其更改为我认为是使用%do%的顺序循环。我碰巧打开了终端，发现在我运行循环时所有处理器都在运行。

这是预期的吗？

可重复的例子：

library(tidyverse)
library(caret)
library(foreach)

# expected to see parallel here because caret and xgb with train()
xgbFit <- train(Species ~ ., data = iris, method = "xgbTree", 
                trControl = trainControl(method = "cv", classProbs = TRUE))

iris_big <- do.call(rbind, replicate(1000, iris, simplify = F))

nr <- nrow(iris_big)
n <- 1000 # loop over in chunks of 20
pieces <- split(iris_big, rep(1:ceiling(nr/n), each=n, length.out=nr))
lenp <- length(pieces)

# did not expect to see parallel processing take place when running the block below
predictions <- foreach(i = seq_len(lenp)) %do% {

  # get prediction
  preds <- pieces[[i]] %>% 
    mutate(xgb_prediction = predict(xgbFit, newdata = .))

  return(preds)
}

bah <- do.call(rbind, predictions)

Answer 1

我最好的猜测是这些流程仍在以前的运行中运行。

使用foreach::registerDoSeq()？

时是一样的

我的第二个猜测是predict并行运行。