Я думаю, что у parallel:::mc.set.stream()
есть ответ. По-видимому, mclapply()
пытается удалить .Random.seed
из глобальной среды по умолчанию. Так как алгоритм RNG по умолчанию - Mersenne Twister, мы погрузимся в блок else
ниже.
> parallel:::mc.set.stream
function ()
{
if (RNGkind()[1L] == "L'Ecuyer-CMRG") {
assign(".Random.seed", get("LEcuyer.seed", envir = RNGenv),
envir = .GlobalEnv)
}
else {
if (exists(".Random.seed", envir = .GlobalEnv, inherits = FALSE))
rm(".Random.seed", envir = .GlobalEnv, inherits = FALSE)
}
}
<bytecode: 0x4709808>
<environment: namespace:parallel>
Мы можем использовать mc.set.seed = FALSE
, чтобы следующий код работал, но это, вероятно, не очень хорошая идея на практике.
set.seed(0)
lockEnvironment(globalenv())
parallel::mclapply(1:2, identity, mc.cores = 2, mc.set.seed = FALSE)
Интересно, есть ли способ заблокировать окружение, в то же время позволяя нам удалить .Random.seed
.
Удалить границы:
\hypersetup{%
pdfborder = {0 0 0}
}
colorlinks
опция включит цвета ссылки и также удалит границы. (Поэтому alamodey устанавливают все цвета ссылки на черный цвет.)
\usepackage{hyperref}
\hypersetup{
colorlinks,
citecolor=black,
filecolor=black,
linkcolor=black,
urlcolor=black
}