R Under development (unstable) (2023-12-20 r85711 ucrt) -- "Unsuffered Consequences" Copyright (C) 2023 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > source("incl/start.R") Loading required package: future [13:13:34.257] plan(): Setting new future strategy stack: [13:13:34.258] List of future strategies: [13:13:34.258] 1. sequential: [13:13:34.258] - args: function (..., envir = parent.frame(), workers = "") [13:13:34.258] - tweaked: FALSE [13:13:34.258] - call: future::plan("sequential") [13:13:34.274] plan(): nbrOfWorkers() = 1 > library("tools") ## toTitleCase() > > options(future.debug = FALSE) > options(future.apply.debug = TRUE) > > message("*** future_lapply() - globals ...") *** future_lapply() - globals ... > > plan(cluster, workers = "localhost") > > a <- 1 > b <- 2 > > globals_set <- list( + A = FALSE, + B = TRUE, + C = c("a", "b"), + D = list(a = 2, b = 3) + ) > > x <- list(1) > y_truth <- list(A = NULL, B = list(1), C = list(1), D = list(2)) > str(y_truth) List of 4 $ A: NULL $ B:List of 1 ..$ : num 1 $ C:List of 1 ..$ : num 1 $ D:List of 1 ..$ : num 2 > > for (name in names(globals_set)) { + globals <- globals_set[[name]] + message("Globals set ", sQuote(name)) + y <- tryCatch({ + future_lapply(x, FUN = function(x) { + median(c(x, a, b)) + }, future.globals = globals, future.packages = "utils") + }, error = identity) + print(y) + stopifnot((name == "A" && inherits(y, "error")) || + identical(y, y_truth[[name]])) + } Globals set 'A' [13:13:35.092] future_lapply() ... [13:13:35.098] Number of chunks: 1 [13:13:35.099] getGlobalsAndPackagesXApply() ... [13:13:35.099] - future.globals: FALSE [13:13:35.102] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [13:13:35.102] - needed namespaces: [n=0] [13:13:35.103] Finding globals ... DONE [13:13:35.103] - use_args: TRUE [13:13:35.103] - Getting '...' globals ... [13:13:35.104] - '...' content: [n=0] [13:13:35.104] List of 1 [13:13:35.104] $ ...: list() [13:13:35.104] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.104] - attr(*, "where")=List of 1 [13:13:35.104] ..$ ...: [13:13:35.104] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.104] - attr(*, "resolved")= logi TRUE [13:13:35.104] - attr(*, "total_size")= num NA [13:13:35.108] - Getting '...' globals ... DONE [13:13:35.108] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [13:13:35.109] List of 3 [13:13:35.109] $ ...future.FUN :function (x) [13:13:35.109] $ future.call.arguments: list() [13:13:35.109] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.109] $ ... : list() [13:13:35.109] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.109] - attr(*, "where")=List of 3 [13:13:35.109] ..$ ...future.FUN : [13:13:35.109] ..$ future.call.arguments: [13:13:35.109] ..$ ... : [13:13:35.109] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.109] - attr(*, "resolved")= logi FALSE [13:13:35.109] - attr(*, "total_size")= num 3824 [13:13:35.114] Packages to be attached in all futures: [n=1] 'utils' [13:13:35.114] getGlobalsAndPackagesXApply() ... DONE [13:13:35.114] Number of futures (= number of chunks): 1 [13:13:35.114] Launching 1 futures (chunks) ... [13:13:35.115] Chunk #1 of 1 ... [13:13:35.115] - seeds: [13:13:35.115] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.126] Created future: [13:13:35.126] ClusterFuture: [13:13:35.126] Label: 'future_lapply-1' [13:13:35.126] Expression: [13:13:35.126] { [13:13:35.126] do.call(function(...) { [13:13:35.126] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.126] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.126] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.126] on.exit(options(oopts), add = TRUE) [13:13:35.126] } [13:13:35.126] { [13:13:35.126] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.126] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.126] ...future.FUN(...future.X_jj, ...) [13:13:35.126] }) [13:13:35.126] } [13:13:35.126] }, args = future.call.arguments) [13:13:35.126] } [13:13:35.126] Lazy evaluation: FALSE [13:13:35.126] Asynchronous evaluation: TRUE [13:13:35.126] Local evaluation: TRUE [13:13:35.126] Environment: R_GlobalEnv [13:13:35.126] Capture standard output: TRUE [13:13:35.126] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.126] Globals: 5 objects totaling 3.79 KiB (function '...future.FUN' of 3.73 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.126] Packages: 1 packages ('utils') [13:13:35.126] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.126] Resolved: TRUE [13:13:35.126] Value: [13:13:35.126] Conditions captured: [13:13:35.126] Early signaling: FALSE [13:13:35.126] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.126] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.144] Chunk #1 of 1 ... DONE [13:13:35.144] Launching 1 futures (chunks) ... DONE [13:13:35.145] Resolving 1 futures (chunks) ... Globals set 'B' [13:13:35.146] future_lapply() ... [13:13:35.147] Number of chunks: 1 [13:13:35.147] getGlobalsAndPackagesXApply() ... [13:13:35.147] - future.globals: TRUE [13:13:35.151] - globals found/used: [n=3] 'FUN', 'a', 'b' [13:13:35.151] - needed namespaces: [n=1] 'stats' [13:13:35.152] Finding globals ... DONE [13:13:35.152] - use_args: TRUE [13:13:35.152] - Getting '...' globals ... [13:13:35.152] - '...' content: [n=0] [13:13:35.153] List of 1 [13:13:35.153] $ ...: list() [13:13:35.153] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.153] - attr(*, "where")=List of 1 [13:13:35.153] ..$ ...: [13:13:35.153] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.153] - attr(*, "resolved")= logi TRUE [13:13:35.153] - attr(*, "total_size")= num NA [13:13:35.156] - Getting '...' globals ... DONE [13:13:35.157] Globals to be used in all futures (chunks): [n=4] '...future.FUN', 'a', 'b', '...' [13:13:35.157] List of 4 [13:13:35.157] $ ...future.FUN:function (x) [13:13:35.157] $ a : num 1 [13:13:35.157] $ b : num 2 [13:13:35.157] $ ... : list() [13:13:35.157] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.157] - attr(*, "where")=List of 4 [13:13:35.157] ..$ ...future.FUN: [13:13:35.157] ..$ a : [13:13:35.157] ..$ b : [13:13:35.157] ..$ ... : [13:13:35.157] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.157] - attr(*, "resolved")= logi FALSE [13:13:35.157] - attr(*, "total_size")= num 3936 [13:13:35.162] Packages to be attached in all futures: [n=2] 'stats', 'utils' [13:13:35.163] getGlobalsAndPackagesXApply() ... DONE [13:13:35.163] Number of futures (= number of chunks): 1 [13:13:35.163] Launching 1 futures (chunks) ... [13:13:35.163] Chunk #1 of 1 ... [13:13:35.164] - Finding globals in 'X' for chunk #1 ... [13:13:35.164] + additional globals found: [n=0] [13:13:35.164] + additional namespaces needed: [n=0] [13:13:35.164] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.165] - seeds: [13:13:35.165] - All globals exported: [n=7] '...future.FUN', 'a', 'b', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.179] Created future: [13:13:35.180] ClusterFuture: [13:13:35.180] Label: 'future_lapply-1' [13:13:35.180] Expression: [13:13:35.180] { [13:13:35.180] do.call(function(...) { [13:13:35.180] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.180] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.180] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.180] on.exit(options(oopts), add = TRUE) [13:13:35.180] } [13:13:35.180] { [13:13:35.180] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.180] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.180] ...future.FUN(...future.X_jj, ...) [13:13:35.180] }) [13:13:35.180] } [13:13:35.180] }, args = future.call.arguments) [13:13:35.180] } [13:13:35.180] Lazy evaluation: FALSE [13:13:35.180] Asynchronous evaluation: TRUE [13:13:35.180] Local evaluation: TRUE [13:13:35.180] Environment: R_GlobalEnv [13:13:35.180] Capture standard output: TRUE [13:13:35.180] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.180] Globals: 7 objects totaling 3.90 KiB (function '...future.FUN' of 3.73 KiB, numeric 'a' of 56 bytes, numeric 'b' of 56 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, ...) [13:13:35.180] Packages: 2 packages ('stats', 'utils') [13:13:35.180] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.180] Resolved: TRUE [13:13:35.180] Value: [13:13:35.180] Conditions captured: [13:13:35.180] Early signaling: FALSE [13:13:35.180] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.180] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.195] Chunk #1 of 1 ... DONE [13:13:35.195] Launching 1 futures (chunks) ... DONE [13:13:35.195] Resolving 1 futures (chunks) ... [13:13:35.196] - Number of value chunks collected: 1 [13:13:35.196] Resolving 1 futures (chunks) ... DONE [13:13:35.196] Reducing values from 1 chunks ... [13:13:35.196] - Number of values collected after concatenation: 1 [13:13:35.196] - Number of values expected: 1 [13:13:35.197] Reducing values from 1 chunks ... DONE [13:13:35.197] future_lapply() ... DONE [[1]] [1] 1 Globals set 'C' [13:13:35.197] future_lapply() ... [13:13:35.198] Number of chunks: 1 [13:13:35.198] getGlobalsAndPackagesXApply() ... [13:13:35.198] - future.globals: 'a', 'b' [13:13:35.199] - use_args: TRUE [13:13:35.199] Globals to be used in all futures (chunks): [n=4] 'a', 'b', '...future.FUN', '...' [13:13:35.199] List of 4 [13:13:35.199] $ a : num 1 [13:13:35.199] $ b : num 2 [13:13:35.199] $ ...future.FUN:function (x) [13:13:35.199] $ ... : list() [13:13:35.199] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.199] - attr(*, "where")=List of 4 [13:13:35.199] ..$ a : [13:13:35.199] ..$ b : [13:13:35.199] ..$ ...future.FUN: [13:13:35.199] ..$ ... : [13:13:35.199] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.199] - attr(*, "resolved")= logi FALSE [13:13:35.199] - attr(*, "total_size")= num NA [13:13:35.204] Packages to be attached in all futures: [n=1] 'utils' [13:13:35.204] getGlobalsAndPackagesXApply() ... DONE [13:13:35.204] Number of futures (= number of chunks): 1 [13:13:35.204] Launching 1 futures (chunks) ... [13:13:35.205] Chunk #1 of 1 ... [13:13:35.205] - seeds: [13:13:35.205] - All globals exported: [n=7] 'a', 'b', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.215] Created future: [13:13:35.216] ClusterFuture: [13:13:35.216] Label: 'future_lapply-1' [13:13:35.216] Expression: [13:13:35.216] { [13:13:35.216] do.call(function(...) { [13:13:35.216] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.216] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.216] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.216] on.exit(options(oopts), add = TRUE) [13:13:35.216] } [13:13:35.216] { [13:13:35.216] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.216] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.216] ...future.FUN(...future.X_jj, ...) [13:13:35.216] }) [13:13:35.216] } [13:13:35.216] }, args = future.call.arguments) [13:13:35.216] } [13:13:35.216] Lazy evaluation: FALSE [13:13:35.216] Asynchronous evaluation: TRUE [13:13:35.216] Local evaluation: TRUE [13:13:35.216] Environment: R_GlobalEnv [13:13:35.216] Capture standard output: TRUE [13:13:35.216] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.216] Globals: 7 objects totaling 3.90 KiB (numeric 'a' of 56 bytes, numeric 'b' of 56 bytes, function '...future.FUN' of 3.73 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, ...) [13:13:35.216] Packages: 1 packages ('utils') [13:13:35.216] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.216] Resolved: TRUE [13:13:35.216] Value: [13:13:35.216] Conditions captured: [13:13:35.216] Early signaling: FALSE [13:13:35.216] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.216] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.231] Chunk #1 of 1 ... DONE [13:13:35.231] Launching 1 futures (chunks) ... DONE [13:13:35.231] Resolving 1 futures (chunks) ... [13:13:35.232] - Number of value chunks collected: 1 [13:13:35.232] Resolving 1 futures (chunks) ... DONE [13:13:35.232] Reducing values from 1 chunks ... [13:13:35.232] - Number of values collected after concatenation: 1 [13:13:35.233] - Number of values expected: 1 [13:13:35.233] Reducing values from 1 chunks ... DONE [13:13:35.233] future_lapply() ... DONE [[1]] [1] 1 Globals set 'D' [13:13:35.233] future_lapply() ... [13:13:35.234] Number of chunks: 1 [13:13:35.234] getGlobalsAndPackagesXApply() ... [13:13:35.234] - future.globals: with names '2', '3' [13:13:35.235] - use_args: TRUE [13:13:35.235] - Getting '...' globals ... [13:13:35.235] - '...' content: [n=0] [13:13:35.236] List of 1 [13:13:35.236] $ ...: list() [13:13:35.236] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.236] - attr(*, "where")=List of 1 [13:13:35.236] ..$ ...: [13:13:35.236] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.236] - attr(*, "resolved")= logi TRUE [13:13:35.236] - attr(*, "total_size")= num NA [13:13:35.239] - Getting '...' globals ... DONE [13:13:35.239] Globals to be used in all futures (chunks): [n=4] 'a', 'b', '...future.FUN', '...' [13:13:35.239] List of 4 [13:13:35.239] $ a : num 2 [13:13:35.239] $ b : num 3 [13:13:35.239] $ ...future.FUN:function (x) [13:13:35.239] $ ... : list() [13:13:35.239] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.239] - attr(*, "where")=List of 4 [13:13:35.239] ..$ a : [13:13:35.239] ..$ b : [13:13:35.239] ..$ ...future.FUN: [13:13:35.239] ..$ ... : [13:13:35.239] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.239] - attr(*, "resolved")= logi FALSE [13:13:35.239] - attr(*, "total_size")= num NA [13:13:35.244] Packages to be attached in all futures: [n=1] 'utils' [13:13:35.244] getGlobalsAndPackagesXApply() ... DONE [13:13:35.244] Number of futures (= number of chunks): 1 [13:13:35.244] Launching 1 futures (chunks) ... [13:13:35.244] Chunk #1 of 1 ... [13:13:35.245] - seeds: [13:13:35.245] - All globals exported: [n=7] 'a', 'b', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.255] Created future: [13:13:35.255] ClusterFuture: [13:13:35.255] Label: 'future_lapply-1' [13:13:35.255] Expression: [13:13:35.255] { [13:13:35.255] do.call(function(...) { [13:13:35.255] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.255] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.255] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.255] on.exit(options(oopts), add = TRUE) [13:13:35.255] } [13:13:35.255] { [13:13:35.255] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.255] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.255] ...future.FUN(...future.X_jj, ...) [13:13:35.255] }) [13:13:35.255] } [13:13:35.255] }, args = future.call.arguments) [13:13:35.255] } [13:13:35.255] Lazy evaluation: FALSE [13:13:35.255] Asynchronous evaluation: TRUE [13:13:35.255] Local evaluation: TRUE [13:13:35.255] Environment: R_GlobalEnv [13:13:35.255] Capture standard output: TRUE [13:13:35.255] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.255] Globals: 7 objects totaling 3.90 KiB (numeric 'a' of 56 bytes, numeric 'b' of 56 bytes, function '...future.FUN' of 3.73 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, ...) [13:13:35.255] Packages: 1 packages ('utils') [13:13:35.255] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.255] Resolved: TRUE [13:13:35.255] Value: [13:13:35.255] Conditions captured: [13:13:35.255] Early signaling: FALSE [13:13:35.255] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.255] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.271] Chunk #1 of 1 ... DONE [13:13:35.271] Launching 1 futures (chunks) ... DONE [13:13:35.271] Resolving 1 futures (chunks) ... [13:13:35.272] - Number of value chunks collected: 1 [13:13:35.272] Resolving 1 futures (chunks) ... DONE [13:13:35.272] Reducing values from 1 chunks ... [13:13:35.272] - Number of values collected after concatenation: 1 [13:13:35.272] - Number of values expected: 1 [13:13:35.273] Reducing values from 1 chunks ... DONE [13:13:35.273] future_lapply() ... DONE [[1]] [1] 2 > > message("*** future_lapply() - globals ... DONE") *** future_lapply() - globals ... DONE > > > message("*** future_lapply() - manual globals ...") *** future_lapply() - manual globals ... > > d <- 42 > y <- future_lapply(1:2, FUN = function(x) { x * d }, + future.globals = structure(FALSE, add = "d")) [13:13:35.273] future_lapply() ... [13:13:35.274] Number of chunks: 1 [13:13:35.274] getGlobalsAndPackagesXApply() ... [13:13:35.274] - future.globals: FALSE [13:13:35.276] - globals found/used: [n=3] 'd', 'FUN', 'future.call.arguments' [13:13:35.276] - needed namespaces: [n=0] [13:13:35.276] Finding globals ... DONE [13:13:35.276] - use_args: TRUE [13:13:35.276] - Getting '...' globals ... [13:13:35.277] - '...' content: [n=0] [13:13:35.277] List of 1 [13:13:35.277] $ ...: list() [13:13:35.277] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.277] - attr(*, "where")=List of 1 [13:13:35.277] ..$ ...: [13:13:35.277] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.277] - attr(*, "resolved")= logi TRUE [13:13:35.277] - attr(*, "total_size")= num NA [13:13:35.280] - Getting '...' globals ... DONE [13:13:35.280] Globals to be used in all futures (chunks): [n=4] 'd', '...future.FUN', 'future.call.arguments', '...' [13:13:35.280] List of 4 [13:13:35.280] $ d : num 42 [13:13:35.280] $ ...future.FUN :function (x) [13:13:35.280] $ future.call.arguments: list() [13:13:35.280] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.280] $ ... : list() [13:13:35.280] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.280] - attr(*, "where")=List of 4 [13:13:35.280] ..$ d : [13:13:35.280] ..$ ...future.FUN : [13:13:35.280] ..$ future.call.arguments: [13:13:35.280] ..$ ... : [13:13:35.280] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.280] - attr(*, "resolved")= logi FALSE [13:13:35.280] - attr(*, "total_size")= num 784 [13:13:35.285] Packages to be attached in all futures: [n=0] [13:13:35.285] getGlobalsAndPackagesXApply() ... DONE [13:13:35.286] Number of futures (= number of chunks): 1 [13:13:35.286] Launching 1 futures (chunks) ... [13:13:35.286] Chunk #1 of 1 ... [13:13:35.286] - seeds: [13:13:35.286] - All globals exported: [n=7] 'd', '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.296] Created future: [13:13:35.296] ClusterFuture: [13:13:35.296] Label: 'future_lapply-1' [13:13:35.296] Expression: [13:13:35.296] { [13:13:35.296] do.call(function(...) { [13:13:35.296] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.296] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.296] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.296] on.exit(options(oopts), add = TRUE) [13:13:35.296] } [13:13:35.296] { [13:13:35.296] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.296] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.296] ...future.FUN(...future.X_jj, ...) [13:13:35.296] }) [13:13:35.296] } [13:13:35.296] }, args = future.call.arguments) [13:13:35.296] } [13:13:35.296] Lazy evaluation: FALSE [13:13:35.296] Asynchronous evaluation: TRUE [13:13:35.296] Local evaluation: TRUE [13:13:35.296] Environment: R_GlobalEnv [13:13:35.296] Capture standard output: TRUE [13:13:35.296] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.296] Globals: 6 objects totaling 896 bytes (numeric 'd' of 56 bytes, function '...future.FUN' of 728 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 112 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:35.296] Packages: [13:13:35.296] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.296] Resolved: TRUE [13:13:35.296] Value: [13:13:35.296] Conditions captured: [13:13:35.296] Early signaling: FALSE [13:13:35.296] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.296] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.311] Chunk #1 of 1 ... DONE [13:13:35.311] Launching 1 futures (chunks) ... DONE [13:13:35.312] Resolving 1 futures (chunks) ... [13:13:35.312] - Number of value chunks collected: 1 [13:13:35.312] Resolving 1 futures (chunks) ... DONE [13:13:35.312] Reducing values from 1 chunks ... [13:13:35.313] - Number of values collected after concatenation: 2 [13:13:35.313] - Number of values expected: 2 [13:13:35.313] Reducing values from 1 chunks ... DONE [13:13:35.313] future_lapply() ... DONE > stopifnot(identical(y, list(42, 84))) > > e <- 42 > res <- tryCatch({ + future_lapply(1:2, FUN = function(x) { 2 * e }, + future.globals = structure(TRUE, ignore = "e")) + }, error = identity) [13:13:35.313] future_lapply() ... [13:13:35.314] Number of chunks: 1 [13:13:35.314] getGlobalsAndPackagesXApply() ... [13:13:35.315] - future.globals: TRUE [13:13:35.317] - globals found/used: [n=1] 'FUN' [13:13:35.317] - needed namespaces: [n=0] [13:13:35.317] Finding globals ... DONE [13:13:35.317] - use_args: TRUE [13:13:35.317] - Getting '...' globals ... [13:13:35.318] - '...' content: [n=0] [13:13:35.318] List of 1 [13:13:35.318] $ ...: list() [13:13:35.318] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.318] - attr(*, "where")=List of 1 [13:13:35.318] ..$ ...: [13:13:35.318] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.318] - attr(*, "resolved")= logi TRUE [13:13:35.318] - attr(*, "total_size")= num NA [13:13:35.323] - Getting '...' globals ... DONE [13:13:35.323] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.323] List of 2 [13:13:35.323] $ ...future.FUN:function (x) [13:13:35.323] $ ... : list() [13:13:35.323] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.323] - attr(*, "where")=List of 2 [13:13:35.323] ..$ ...future.FUN: [13:13:35.323] ..$ ... : [13:13:35.323] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.323] - attr(*, "resolved")= logi FALSE [13:13:35.323] - attr(*, "total_size")= num 728 [13:13:35.327] Packages to be attached in all futures: [n=0] [13:13:35.327] getGlobalsAndPackagesXApply() ... DONE [13:13:35.327] Number of futures (= number of chunks): 1 [13:13:35.327] Launching 1 futures (chunks) ... [13:13:35.327] Chunk #1 of 1 ... [13:13:35.328] - Finding globals in 'X' for chunk #1 ... [13:13:35.328] + additional globals found: [n=0] [13:13:35.328] + additional namespaces needed: [n=0] [13:13:35.328] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.328] - seeds: [13:13:35.329] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.338] Created future: [13:13:35.338] ClusterFuture: [13:13:35.338] Label: 'future_lapply-1' [13:13:35.338] Expression: [13:13:35.338] { [13:13:35.338] do.call(function(...) { [13:13:35.338] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.338] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.338] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.338] on.exit(options(oopts), add = TRUE) [13:13:35.338] } [13:13:35.338] { [13:13:35.338] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.338] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.338] ...future.FUN(...future.X_jj, ...) [13:13:35.338] }) [13:13:35.338] } [13:13:35.338] }, args = future.call.arguments) [13:13:35.338] } [13:13:35.338] Lazy evaluation: FALSE [13:13:35.338] Asynchronous evaluation: TRUE [13:13:35.338] Local evaluation: TRUE [13:13:35.338] Environment: R_GlobalEnv [13:13:35.338] Capture standard output: TRUE [13:13:35.338] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.338] Globals: 5 objects totaling 840 bytes (function '...future.FUN' of 728 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 112 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.338] Packages: [13:13:35.338] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.338] Resolved: TRUE [13:13:35.338] Value: [13:13:35.338] Conditions captured: [13:13:35.338] Early signaling: FALSE [13:13:35.338] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.338] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:35.354] Chunk #1 of 1 ... DONE [13:13:35.354] Launching 1 futures (chunks) ... DONE [13:13:35.355] Resolving 1 futures (chunks) ... > stopifnot(inherits(res, "error")) > > message("*** future_lapply() - manual globals ... DONE") *** future_lapply() - manual globals ... DONE > > > > ## Test adopted from http://stackoverflow.com/questions/42561088/nested-do-call-within-a-foreach-dopar-environment-cant-find-function-passed-w > > message("*** future_lapply() - tricky globals ...") *** future_lapply() - tricky globals ... > > my_add <- function(a, b) a + b > > call_my_add <- function(a, b) { + do.call(my_add, args = list(a = a, b = b)) + } > > call_my_add_caller <- function(a, b, FUN = call_my_add) { + do.call(FUN, args = list(a = a, b = b)) + } > > main <- function(x = 1:2, caller = call_my_add_caller, + args = list(FUN = call_my_add)) { + results <- future_lapply(x, FUN = function(i) { + do.call(caller, args = c(list(a = i, b = i + 1L), args)) + }) + results + } > > x <- list(list(1:2)) > z_length <- lapply(x, FUN = do.call, what = length) > fun <- function(...) sum(...) > z_fun <- lapply(x, FUN = do.call, what = fun) > > y0 <- NULL > for (strategy in supportedStrategies()) { + plan(strategy) + + y <- main(1:3) + if (is.null(y0)) y0 <- y + stopifnot(identical(y, y0)) + + message("- future_lapply(x, FUN = do.call, ...) ...") + z <- future_lapply(x, FUN = do.call, what = length) + stopifnot(identical(z, z_length)) + z <- future_lapply(x, FUN = do.call, what = fun) + stopifnot(identical(z, z_fun)) + + message("- future_lapply(x, ...) - passing arguments via '...' ...") + ## typeof() == "list" + obj <- data.frame(a = 1:2) + stopifnot(typeof(obj) == "list") + y <- future_lapply(1L, function(a, b) typeof(b), b = obj) + stopifnot(identical(y[[1]], typeof(obj))) + + ## typeof() == "environment" + obj <- new.env() + stopifnot(typeof(obj) == "environment") + y <- future_lapply(1L, function(a, b) typeof(b), b = obj) + stopifnot(identical(y[[1]], typeof(obj))) + + ## typeof() == "S4" + if (requireNamespace("methods")) { + obj <- methods::getClass("MethodDefinition") + stopifnot(typeof(obj) == "S4") + y <- future_lapply(1L, function(a, b) typeof(b), b = obj) + stopifnot(identical(y[[1]], typeof(obj))) + } + + message("- future_lapply(X, ...) - 'X' containing globals ...") + ## From https://github.com/HenrikBengtsson/future.apply/issues/12 + a <- 42 + b <- 21 + X <- list( + function(b) 2 * a, + function() b / 2, + function() a + b, + function() nchar(toTitleCase("hello world")) + ) + z0 <- lapply(X, FUN = function(f) f()) + str(z0) + z1 <- future_lapply(X, FUN = function(f) f()) + str(z1) + stopifnot(identical(z1, z0)) + + message("- future_lapply(x, ...) - passing '...' as a global ...") + ## https://github.com/HenrikBengtsson/future/issues/417 + fcn0 <- function(...) { lapply(1, FUN = function(x) list(...)) } + z0 <- fcn0(a = 1) + str(list(z0 = z0)) + stopifnot(identical(z0, list(list(a = 1)))) + fcn <- function(...) { future_lapply(1, FUN = function(x) list(...)) } + z1 <- fcn(a = 1) + str(list(z1 = z1)) + stopifnot(identical(z1, z0)) + + ## https://github.com/HenrikBengtsson/future.apply/issues/47 + message("- future_lapply(X, ...) - '{ a <- a + 1; a }' ...") + a <- 1 + z0 <- lapply(1, function(ii) { + a <- a + 1 + a + }) + z1 <- future_lapply(1, function(ii) { + a <- a + 1 + a + }) + stopifnot(identical(z1, z0)) + + ## https://github.com/HenrikBengtsson/future.apply/issues/47 + message("- future_lapply(X, ...) - '{ a; a <- a + 1 }' ...") + z2 <- tryCatch(future_lapply(1, function(ii) { + a + a <- a + 1 + }), error = identity) + stopifnot(identical(z2, z0)) + + ## https://github.com/HenrikBengtsson/future.apply/issues/85 + message("- future_lapply(..., future.globals = ) ...") + a <- 0 + y <- future_lapply(1, FUN = function(x) a, future.globals = list(a = 42)) + str(y) + stopifnot(y[[1]] == 42) + } ## for (strategy ...) [13:13:35.424] future_lapply() ... [13:13:35.425] Number of chunks: 1 [13:13:35.425] getGlobalsAndPackagesXApply() ... [13:13:35.425] - future.globals: TRUE [13:13:35.431] - globals found/used: [n=5] 'FUN', 'caller', 'args', 'call_my_add', 'my_add' [13:13:35.432] - needed namespaces: [n=0] [13:13:35.432] Finding globals ... DONE [13:13:35.432] - use_args: TRUE [13:13:35.432] - Getting '...' globals ... [13:13:35.432] - '...' content: [n=0] [13:13:35.433] List of 1 [13:13:35.433] $ ...: list() [13:13:35.433] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.433] - attr(*, "where")=List of 1 [13:13:35.433] ..$ ...: [13:13:35.433] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.433] - attr(*, "resolved")= logi TRUE [13:13:35.433] - attr(*, "total_size")= num NA [13:13:35.436] - Getting '...' globals ... DONE [13:13:35.436] Globals to be used in all futures (chunks): [n=6] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...' [13:13:35.436] List of 6 [13:13:35.436] $ ...future.FUN:function (i) [13:13:35.436] $ caller :function (a, b, FUN = call_my_add) [13:13:35.436] $ args :List of 1 [13:13:35.436] ..$ FUN:function (a, b) [13:13:35.436] $ call_my_add :function (a, b) [13:13:35.436] $ my_add :function (a, b) [13:13:35.436] $ ... : list() [13:13:35.436] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.436] - attr(*, "where")=List of 6 [13:13:35.436] ..$ ...future.FUN: [13:13:35.436] ..$ caller : [13:13:35.436] ..$ args : [13:13:35.436] ..$ call_my_add : [13:13:35.436] ..$ my_add : [13:13:35.436] ..$ ... : [13:13:35.436] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.436] - attr(*, "resolved")= logi FALSE [13:13:35.436] - attr(*, "total_size")= num 6664 [13:13:35.442] Packages to be attached in all futures: [n=0] [13:13:35.442] getGlobalsAndPackagesXApply() ... DONE [13:13:35.442] Number of futures (= number of chunks): 1 [13:13:35.443] Launching 1 futures (chunks) ... [13:13:35.443] Chunk #1 of 1 ... [13:13:35.443] - Finding globals in 'X' for chunk #1 ... [13:13:35.443] + additional globals found: [n=0] [13:13:35.443] + additional namespaces needed: [n=0] [13:13:35.444] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.444] - seeds: [13:13:35.444] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.451] Created future: [13:13:35.451] SequentialFuture: [13:13:35.451] Label: 'future_lapply-1' [13:13:35.451] Expression: [13:13:35.451] { [13:13:35.451] do.call(function(...) { [13:13:35.451] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.451] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.451] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.451] on.exit(options(oopts), add = TRUE) [13:13:35.451] } [13:13:35.451] { [13:13:35.451] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.451] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.451] ...future.FUN(...future.X_jj, ...) [13:13:35.451] }) [13:13:35.451] } [13:13:35.451] }, args = future.call.arguments) [13:13:35.451] } [13:13:35.451] Lazy evaluation: FALSE [13:13:35.451] Asynchronous evaluation: FALSE [13:13:35.451] Local evaluation: TRUE [13:13:35.451] Environment: 0x000001ff4452c998 [13:13:35.451] Capture standard output: TRUE [13:13:35.451] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.451] Globals: 9 objects totaling 16.21 KiB (function '...future.FUN' of 1.70 KiB, function 'caller' of 1.48 KiB, list 'args' of 5.72 KiB, function 'call_my_add' of 5.72 KiB, function 'my_add' of 1.44 KiB, ...) [13:13:35.451] Packages: [13:13:35.451] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.451] Resolved: TRUE [13:13:35.451] Value: 168 bytes of class 'list' [13:13:35.451] Early signaling: FALSE [13:13:35.451] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.451] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.453] Chunk #1 of 1 ... DONE [13:13:35.453] Launching 1 futures (chunks) ... DONE [13:13:35.453] Resolving 1 futures (chunks) ... [13:13:35.454] - Number of value chunks collected: 1 [13:13:35.454] Resolving 1 futures (chunks) ... DONE [13:13:35.454] Reducing values from 1 chunks ... [13:13:35.455] - Number of values collected after concatenation: 3 [13:13:35.455] - Number of values expected: 3 [13:13:35.455] Reducing values from 1 chunks ... DONE [13:13:35.455] future_lapply() ... DONE - future_lapply(x, FUN = do.call, ...) ... [13:13:35.455] future_lapply() ... [13:13:35.460] Number of chunks: 1 [13:13:35.460] getGlobalsAndPackagesXApply() ... [13:13:35.460] - future.globals: TRUE [13:13:35.465] - globals found/used: [n=1] 'FUN' [13:13:35.465] - needed namespaces: [n=0] [13:13:35.465] Finding globals ... DONE [13:13:35.466] - use_args: TRUE [13:13:35.466] - Getting '...' globals ... [13:13:35.466] - '...' content: [n=1] 'what' [13:13:35.466] List of 1 [13:13:35.466] $ ...:List of 1 [13:13:35.466] ..$ what:function (x) [13:13:35.466] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.466] - attr(*, "where")=List of 1 [13:13:35.466] ..$ ...: [13:13:35.466] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.466] - attr(*, "resolved")= logi TRUE [13:13:35.466] - attr(*, "total_size")= num NA [13:13:35.470] - Getting '...' globals ... DONE [13:13:35.470] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.470] List of 2 [13:13:35.470] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [13:13:35.470] $ ... :List of 1 [13:13:35.470] ..$ what:function (x) [13:13:35.470] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.470] - attr(*, "where")=List of 2 [13:13:35.470] ..$ ...future.FUN: [13:13:35.470] ..$ ... : [13:13:35.470] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.470] - attr(*, "resolved")= logi FALSE [13:13:35.470] - attr(*, "total_size")= num 12192 [13:13:35.474] Packages to be attached in all futures: [n=0] [13:13:35.474] getGlobalsAndPackagesXApply() ... DONE [13:13:35.474] Number of futures (= number of chunks): 1 [13:13:35.474] Launching 1 futures (chunks) ... [13:13:35.475] Chunk #1 of 1 ... [13:13:35.475] - Finding globals in 'X' for chunk #1 ... [13:13:35.475] + additional globals found: [n=0] [13:13:35.475] + additional namespaces needed: [n=0] [13:13:35.476] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.476] - seeds: [13:13:35.476] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.479] Created future: [13:13:35.479] SequentialFuture: [13:13:35.479] Label: 'future_lapply-1' [13:13:35.479] Expression: [13:13:35.479] { [13:13:35.479] do.call(function(...) { [13:13:35.479] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.479] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.479] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.479] on.exit(options(oopts), add = TRUE) [13:13:35.479] } [13:13:35.479] { [13:13:35.479] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.479] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.479] ...future.FUN(...future.X_jj, ...) [13:13:35.479] }) [13:13:35.479] } [13:13:35.479] }, args = future.call.arguments) [13:13:35.479] } [13:13:35.479] Lazy evaluation: FALSE [13:13:35.479] Asynchronous evaluation: FALSE [13:13:35.479] Local evaluation: TRUE [13:13:35.479] Environment: R_GlobalEnv [13:13:35.479] Capture standard output: TRUE [13:13:35.479] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.479] Globals: 5 objects totaling 11.96 KiB (function '...future.FUN' of 11.85 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.479] Packages: [13:13:35.479] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.479] Resolved: TRUE [13:13:35.479] Value: 56 bytes of class 'list' [13:13:35.479] Early signaling: FALSE [13:13:35.479] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.479] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.480] Chunk #1 of 1 ... DONE [13:13:35.481] Launching 1 futures (chunks) ... DONE [13:13:35.481] Resolving 1 futures (chunks) ... [13:13:35.481] - Number of value chunks collected: 1 [13:13:35.482] Resolving 1 futures (chunks) ... DONE [13:13:35.482] Reducing values from 1 chunks ... [13:13:35.482] - Number of values collected after concatenation: 1 [13:13:35.482] - Number of values expected: 1 [13:13:35.482] Reducing values from 1 chunks ... DONE [13:13:35.482] future_lapply() ... DONE [13:13:35.482] future_lapply() ... [13:13:35.484] Number of chunks: 1 [13:13:35.484] getGlobalsAndPackagesXApply() ... [13:13:35.485] - future.globals: TRUE [13:13:35.488] - globals found/used: [n=1] 'FUN' [13:13:35.488] - needed namespaces: [n=0] [13:13:35.488] Finding globals ... DONE [13:13:35.489] - use_args: TRUE [13:13:35.489] - Getting '...' globals ... [13:13:35.489] - '...' content: [n=1] 'what' [13:13:35.489] List of 1 [13:13:35.489] $ ...:List of 1 [13:13:35.489] ..$ what:function (...) [13:13:35.489] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.489] - attr(*, "where")=List of 1 [13:13:35.489] ..$ ...: [13:13:35.489] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.489] - attr(*, "resolved")= logi TRUE [13:13:35.489] - attr(*, "total_size")= num NA [13:13:35.493] - Getting '...' globals ... DONE [13:13:35.493] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.493] List of 2 [13:13:35.493] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [13:13:35.493] $ ... :List of 1 [13:13:35.493] ..$ what:function (...) [13:13:35.493] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.493] - attr(*, "where")=List of 2 [13:13:35.493] ..$ ...future.FUN: [13:13:35.493] ..$ ... : [13:13:35.493] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.493] - attr(*, "resolved")= logi FALSE [13:13:35.493] - attr(*, "total_size")= num 12584 [13:13:35.497] Packages to be attached in all futures: [n=0] [13:13:35.497] getGlobalsAndPackagesXApply() ... DONE [13:13:35.497] Number of futures (= number of chunks): 1 [13:13:35.497] Launching 1 futures (chunks) ... [13:13:35.498] Chunk #1 of 1 ... [13:13:35.498] - Finding globals in 'X' for chunk #1 ... [13:13:35.498] + additional globals found: [n=0] [13:13:35.498] + additional namespaces needed: [n=0] [13:13:35.499] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.499] - seeds: [13:13:35.499] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.503] Created future: [13:13:35.503] SequentialFuture: [13:13:35.503] Label: 'future_lapply-1' [13:13:35.503] Expression: [13:13:35.503] { [13:13:35.503] do.call(function(...) { [13:13:35.503] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.503] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.503] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.503] on.exit(options(oopts), add = TRUE) [13:13:35.503] } [13:13:35.503] { [13:13:35.503] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.503] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.503] ...future.FUN(...future.X_jj, ...) [13:13:35.503] }) [13:13:35.503] } [13:13:35.503] }, args = future.call.arguments) [13:13:35.503] } [13:13:35.503] Lazy evaluation: FALSE [13:13:35.503] Asynchronous evaluation: FALSE [13:13:35.503] Local evaluation: TRUE [13:13:35.503] Environment: R_GlobalEnv [13:13:35.503] Capture standard output: TRUE [13:13:35.503] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.503] Globals: 5 objects totaling 13.09 KiB (function '...future.FUN' of 11.85 KiB, DotDotDotList 'future.call.arguments' of 1.19 KiB, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.503] Packages: [13:13:35.503] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.503] Resolved: TRUE [13:13:35.503] Value: 56 bytes of class 'list' [13:13:35.503] Early signaling: FALSE [13:13:35.503] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.503] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.504] Chunk #1 of 1 ... DONE [13:13:35.505] Launching 1 futures (chunks) ... DONE [13:13:35.505] Resolving 1 futures (chunks) ... [13:13:35.505] - Number of value chunks collected: 1 [13:13:35.505] Resolving 1 futures (chunks) ... DONE [13:13:35.506] Reducing values from 1 chunks ... [13:13:35.506] - Number of values collected after concatenation: 1 [13:13:35.506] - Number of values expected: 1 [13:13:35.506] Reducing values from 1 chunks ... DONE [13:13:35.506] future_lapply() ... DONE - future_lapply(x, ...) - passing arguments via '...' ... [13:13:35.507] future_lapply() ... [13:13:35.507] Number of chunks: 1 [13:13:35.508] getGlobalsAndPackagesXApply() ... [13:13:35.508] - future.globals: TRUE [13:13:35.510] - globals found/used: [n=1] 'FUN' [13:13:35.510] - needed namespaces: [n=0] [13:13:35.510] Finding globals ... DONE [13:13:35.510] - use_args: TRUE [13:13:35.510] - Getting '...' globals ... [13:13:35.511] - '...' content: [n=1] 'b' [13:13:35.511] List of 1 [13:13:35.511] $ ...:List of 1 [13:13:35.511] ..$ b:'data.frame': 2 obs. of 1 variable: [13:13:35.511] .. ..$ a: int [1:2] 1 2 [13:13:35.511] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.511] - attr(*, "where")=List of 1 [13:13:35.511] ..$ ...: [13:13:35.511] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.511] - attr(*, "resolved")= logi TRUE [13:13:35.511] - attr(*, "total_size")= num NA [13:13:35.515] - Getting '...' globals ... DONE [13:13:35.515] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.515] List of 2 [13:13:35.515] $ ...future.FUN:function (a, b) [13:13:35.515] $ ... :List of 1 [13:13:35.515] ..$ b:'data.frame': 2 obs. of 1 variable: [13:13:35.515] .. ..$ a: int [1:2] 1 2 [13:13:35.515] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.515] - attr(*, "where")=List of 2 [13:13:35.515] ..$ ...future.FUN: [13:13:35.515] ..$ ... : [13:13:35.515] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.515] - attr(*, "resolved")= logi FALSE [13:13:35.515] - attr(*, "total_size")= num 1440 [13:13:35.520] Packages to be attached in all futures: [n=0] [13:13:35.520] getGlobalsAndPackagesXApply() ... DONE [13:13:35.520] Number of futures (= number of chunks): 1 [13:13:35.520] Launching 1 futures (chunks) ... [13:13:35.520] Chunk #1 of 1 ... [13:13:35.521] - Finding globals in 'X' for chunk #1 ... [13:13:35.521] + additional globals found: [n=0] [13:13:35.521] + additional namespaces needed: [n=0] [13:13:35.521] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.521] - seeds: [13:13:35.522] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.525] Created future: [13:13:35.525] SequentialFuture: [13:13:35.525] Label: 'future_lapply-1' [13:13:35.525] Expression: [13:13:35.525] { [13:13:35.525] do.call(function(...) { [13:13:35.525] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.525] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.525] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.525] on.exit(options(oopts), add = TRUE) [13:13:35.525] } [13:13:35.525] { [13:13:35.525] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.525] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.525] ...future.FUN(...future.X_jj, ...) [13:13:35.525] }) [13:13:35.525] } [13:13:35.525] }, args = future.call.arguments) [13:13:35.525] } [13:13:35.525] Lazy evaluation: FALSE [13:13:35.525] Asynchronous evaluation: FALSE [13:13:35.525] Local evaluation: TRUE [13:13:35.525] Environment: R_GlobalEnv [13:13:35.525] Capture standard output: TRUE [13:13:35.525] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.525] Globals: 5 objects totaling 1.52 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.525] Packages: [13:13:35.525] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.525] Resolved: TRUE [13:13:35.525] Value: 112 bytes of class 'list' [13:13:35.525] Early signaling: FALSE [13:13:35.525] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.525] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.526] Chunk #1 of 1 ... DONE [13:13:35.526] Launching 1 futures (chunks) ... DONE [13:13:35.527] Resolving 1 futures (chunks) ... [13:13:35.527] - Number of value chunks collected: 1 [13:13:35.527] Resolving 1 futures (chunks) ... DONE [13:13:35.527] Reducing values from 1 chunks ... [13:13:35.528] - Number of values collected after concatenation: 1 [13:13:35.528] - Number of values expected: 1 [13:13:35.528] Reducing values from 1 chunks ... DONE [13:13:35.528] future_lapply() ... DONE [13:13:35.530] future_lapply() ... [13:13:35.530] Number of chunks: 1 [13:13:35.530] getGlobalsAndPackagesXApply() ... [13:13:35.531] - future.globals: TRUE [13:13:35.532] - globals found/used: [n=1] 'FUN' [13:13:35.533] - needed namespaces: [n=0] [13:13:35.533] Finding globals ... DONE [13:13:35.533] - use_args: TRUE [13:13:35.533] - Getting '...' globals ... [13:13:35.534] - '...' content: [n=1] 'b' [13:13:35.534] List of 1 [13:13:35.534] $ ...:List of 1 [13:13:35.534] ..$ b: [13:13:35.534] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.534] - attr(*, "where")=List of 1 [13:13:35.534] ..$ ...: [13:13:35.534] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.534] - attr(*, "resolved")= logi TRUE [13:13:35.534] - attr(*, "total_size")= num NA [13:13:35.537] - Getting '...' globals ... DONE [13:13:35.537] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.538] List of 2 [13:13:35.538] $ ...future.FUN:function (a, b) [13:13:35.538] $ ... :List of 1 [13:13:35.538] ..$ b: [13:13:35.538] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.538] - attr(*, "where")=List of 2 [13:13:35.538] ..$ ...future.FUN: [13:13:35.538] ..$ ... : [13:13:35.538] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.538] - attr(*, "resolved")= logi FALSE [13:13:35.538] - attr(*, "total_size")= num 1440 [13:13:35.541] Packages to be attached in all futures: [n=0] [13:13:35.541] getGlobalsAndPackagesXApply() ... DONE [13:13:35.542] Number of futures (= number of chunks): 1 [13:13:35.542] Launching 1 futures (chunks) ... [13:13:35.542] Chunk #1 of 1 ... [13:13:35.542] - Finding globals in 'X' for chunk #1 ... [13:13:35.543] + additional globals found: [n=0] [13:13:35.543] + additional namespaces needed: [n=0] [13:13:35.543] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.543] - seeds: [13:13:35.543] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.546] Created future: [13:13:35.546] SequentialFuture: [13:13:35.546] Label: 'future_lapply-1' [13:13:35.546] Expression: [13:13:35.546] { [13:13:35.546] do.call(function(...) { [13:13:35.546] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.546] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.546] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.546] on.exit(options(oopts), add = TRUE) [13:13:35.546] } [13:13:35.546] { [13:13:35.546] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.546] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.546] ...future.FUN(...future.X_jj, ...) [13:13:35.546] }) [13:13:35.546] } [13:13:35.546] }, args = future.call.arguments) [13:13:35.546] } [13:13:35.546] Lazy evaluation: FALSE [13:13:35.546] Asynchronous evaluation: FALSE [13:13:35.546] Local evaluation: TRUE [13:13:35.546] Environment: R_GlobalEnv [13:13:35.546] Capture standard output: TRUE [13:13:35.546] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.546] Globals: 5 objects totaling 1.46 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.546] Packages: [13:13:35.546] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.546] Resolved: TRUE [13:13:35.546] Value: 120 bytes of class 'list' [13:13:35.546] Early signaling: FALSE [13:13:35.546] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.546] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.548] Chunk #1 of 1 ... DONE [13:13:35.548] Launching 1 futures (chunks) ... DONE [13:13:35.548] Resolving 1 futures (chunks) ... [13:13:35.549] - Number of value chunks collected: 1 [13:13:35.549] Resolving 1 futures (chunks) ... DONE [13:13:35.549] Reducing values from 1 chunks ... [13:13:35.549] - Number of values collected after concatenation: 1 [13:13:35.549] - Number of values expected: 1 [13:13:35.549] Reducing values from 1 chunks ... DONE [13:13:35.549] future_lapply() ... DONE [13:13:35.550] future_lapply() ... [13:13:35.550] Number of chunks: 1 [13:13:35.551] getGlobalsAndPackagesXApply() ... [13:13:35.551] - future.globals: TRUE [13:13:35.554] - globals found/used: [n=1] 'FUN' [13:13:35.554] - needed namespaces: [n=0] [13:13:35.554] Finding globals ... DONE [13:13:35.554] - use_args: TRUE [13:13:35.554] - Getting '...' globals ... [13:13:35.555] - '...' content: [n=1] 'b' [13:13:35.555] List of 1 [13:13:35.555] $ ...:List of 1 [13:13:35.555] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [13:13:35.555] .. .. ..@ slots :List of 4 [13:13:35.555] .. .. .. ..$ .Data : chr "function" [13:13:35.555] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. ..$ target : chr "signature" [13:13:35.555] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. ..$ defined: chr "signature" [13:13:35.555] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. ..$ generic: chr "character" [13:13:35.555] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. ..@ contains :List of 3 [13:13:35.555] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "function" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr "function" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 2 [13:13:35.555] .. .. ..@ virtual : logi FALSE [13:13:35.555] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [13:13:35.555] list() [13:13:35.555] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [13:13:35.555] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:35.555] .. .. .. .. .. .. ..@ names : chr(0) [13:13:35.555] .. .. .. .. .. .. ..@ package: chr(0) [13:13:35.555] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [13:13:35.555] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:35.555] .. .. .. .. .. .. ..@ names : chr(0) [13:13:35.555] .. .. .. .. .. .. ..@ package: chr(0) [13:13:35.555] .. .. .. .. ..$ generic: chr(0) [13:13:35.555] .. .. ..@ validity : NULL [13:13:35.555] .. .. ..@ access : list() [13:13:35.555] .. .. ..@ className : chr "MethodDefinition" [13:13:35.555] .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. ..@ package : chr "methods" [13:13:35.555] .. .. ..@ subclasses:List of 7 [13:13:35.555] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr(0) [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 1 [13:13:35.555] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 2 [13:13:35.555] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr "MethodWithNext" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 2 [13:13:35.555] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.555] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.555] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.555] .. .. .. .. .. ..@ test :function (object) [13:13:35.555] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.555] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.555] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:35.555] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.555] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.555] .. .. .. .. .. ..@ distance : num 2 [13:13:35.555] .. .. ..@ versionKey: [13:13:35.555] .. .. ..@ sealed : logi TRUE [13:13:35.555] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.555] - attr(*, "where")=List of 1 [13:13:35.555] ..$ ...: [13:13:35.555] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.555] - attr(*, "resolved")= logi TRUE [13:13:35.555] - attr(*, "total_size")= num NA [13:13:35.614] - Getting '...' globals ... DONE [13:13:35.614] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.614] List of 2 [13:13:35.614] $ ...future.FUN:function (a, b) [13:13:35.614] $ ... :List of 1 [13:13:35.614] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [13:13:35.614] .. .. ..@ slots :List of 4 [13:13:35.614] .. .. .. ..$ .Data : chr "function" [13:13:35.614] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. ..$ target : chr "signature" [13:13:35.614] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. ..$ defined: chr "signature" [13:13:35.614] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. ..$ generic: chr "character" [13:13:35.614] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. ..@ contains :List of 3 [13:13:35.614] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "function" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr "function" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 2 [13:13:35.614] .. .. ..@ virtual : logi FALSE [13:13:35.614] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [13:13:35.614] list() [13:13:35.614] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [13:13:35.614] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:35.614] .. .. .. .. .. .. ..@ names : chr(0) [13:13:35.614] .. .. .. .. .. .. ..@ package: chr(0) [13:13:35.614] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [13:13:35.614] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:35.614] .. .. .. .. .. .. ..@ names : chr(0) [13:13:35.614] .. .. .. .. .. .. ..@ package: chr(0) [13:13:35.614] .. .. .. .. ..$ generic: chr(0) [13:13:35.614] .. .. ..@ validity : NULL [13:13:35.614] .. .. ..@ access : list() [13:13:35.614] .. .. ..@ className : chr "MethodDefinition" [13:13:35.614] .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. ..@ package : chr "methods" [13:13:35.614] .. .. ..@ subclasses:List of 7 [13:13:35.614] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr(0) [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 1 [13:13:35.614] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 2 [13:13:35.614] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr "MethodWithNext" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 2 [13:13:35.614] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:35.614] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ package : chr "methods" [13:13:35.614] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:35.614] .. .. .. .. .. ..@ test :function (object) [13:13:35.614] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:35.614] .. .. .. .. .. ..@ simple : logi TRUE [13:13:35.614] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:35.614] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:35.614] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:35.614] .. .. .. .. .. ..@ distance : num 2 [13:13:35.614] .. .. ..@ versionKey: [13:13:35.614] .. .. ..@ sealed : logi TRUE [13:13:35.614] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.614] - attr(*, "where")=List of 2 [13:13:35.614] ..$ ...future.FUN: [13:13:35.614] ..$ ... : [13:13:35.614] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.614] - attr(*, "resolved")= logi FALSE [13:13:35.614] - attr(*, "total_size")= num 405168 [13:13:35.672] Packages to be attached in all futures: [n=0] [13:13:35.672] getGlobalsAndPackagesXApply() ... DONE [13:13:35.673] Number of futures (= number of chunks): 1 [13:13:35.673] Launching 1 futures (chunks) ... [13:13:35.673] Chunk #1 of 1 ... [13:13:35.673] - Finding globals in 'X' for chunk #1 ... [13:13:35.673] + additional globals found: [n=0] [13:13:35.674] + additional namespaces needed: [n=0] [13:13:35.674] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.674] - seeds: [13:13:35.674] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.677] Created future: [13:13:35.677] SequentialFuture: [13:13:35.677] Label: 'future_lapply-1' [13:13:35.677] Expression: [13:13:35.677] { [13:13:35.677] do.call(function(...) { [13:13:35.677] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.677] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.677] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.677] on.exit(options(oopts), add = TRUE) [13:13:35.677] } [13:13:35.677] { [13:13:35.677] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.677] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.677] ...future.FUN(...future.X_jj, ...) [13:13:35.677] }) [13:13:35.677] } [13:13:35.677] }, args = future.call.arguments) [13:13:35.677] } [13:13:35.677] Lazy evaluation: FALSE [13:13:35.677] Asynchronous evaluation: FALSE [13:13:35.677] Local evaluation: TRUE [13:13:35.677] Environment: R_GlobalEnv [13:13:35.677] Capture standard output: TRUE [13:13:35.677] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.677] Globals: 5 objects totaling 395.73 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 394.27 KiB, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.677] Packages: [13:13:35.677] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.677] Resolved: TRUE [13:13:35.677] Value: 112 bytes of class 'list' [13:13:35.677] Early signaling: FALSE [13:13:35.677] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.677] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.680] Chunk #1 of 1 ... DONE [13:13:35.681] Launching 1 futures (chunks) ... DONE [13:13:35.681] Resolving 1 futures (chunks) ... [13:13:35.682] - Number of value chunks collected: 1 [13:13:35.682] Resolving 1 futures (chunks) ... DONE [13:13:35.682] Reducing values from 1 chunks ... [13:13:35.683] - Number of values collected after concatenation: 1 [13:13:35.683] - Number of values expected: 1 [13:13:35.683] Reducing values from 1 chunks ... DONE [13:13:35.683] future_lapply() ... DONE - future_lapply(X, ...) - 'X' containing globals ... List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 [13:13:35.687] future_lapply() ... [13:13:35.688] Number of chunks: 1 [13:13:35.689] getGlobalsAndPackagesXApply() ... [13:13:35.689] - future.globals: TRUE [13:13:35.691] - globals found/used: [n=1] 'FUN' [13:13:35.692] - needed namespaces: [n=0] [13:13:35.692] Finding globals ... DONE [13:13:35.692] - use_args: TRUE [13:13:35.692] - Getting '...' globals ... [13:13:35.693] - '...' content: [n=0] [13:13:35.693] List of 1 [13:13:35.693] $ ...: list() [13:13:35.693] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.693] - attr(*, "where")=List of 1 [13:13:35.693] ..$ ...: [13:13:35.693] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.693] - attr(*, "resolved")= logi TRUE [13:13:35.693] - attr(*, "total_size")= num NA [13:13:35.697] - Getting '...' globals ... DONE [13:13:35.697] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:35.698] List of 2 [13:13:35.698] $ ...future.FUN:function (f) [13:13:35.698] $ ... : list() [13:13:35.698] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.698] - attr(*, "where")=List of 2 [13:13:35.698] ..$ ...future.FUN: [13:13:35.698] ..$ ... : [13:13:35.698] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.698] - attr(*, "resolved")= logi FALSE [13:13:35.698] - attr(*, "total_size")= num 1008 [13:13:35.702] Packages to be attached in all futures: [n=0] [13:13:35.702] getGlobalsAndPackagesXApply() ... DONE [13:13:35.702] Number of futures (= number of chunks): 1 [13:13:35.703] Launching 1 futures (chunks) ... [13:13:35.703] Chunk #1 of 1 ... [13:13:35.703] - Finding globals in 'X' for chunk #1 ... [13:13:35.707] + additional globals found: [n=2] 'a', 'b' [13:13:35.707] + additional namespaces needed: [n=1] 'tools' [13:13:35.708] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.708] - seeds: [13:13:35.708] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [13:13:35.718] Created future: [13:13:35.718] SequentialFuture: [13:13:35.718] Label: 'future_lapply-1' [13:13:35.718] Expression: [13:13:35.718] { [13:13:35.718] do.call(function(...) { [13:13:35.718] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.718] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.718] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.718] on.exit(options(oopts), add = TRUE) [13:13:35.718] } [13:13:35.718] { [13:13:35.718] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.718] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.718] ...future.FUN(...future.X_jj, ...) [13:13:35.718] }) [13:13:35.718] } [13:13:35.718] }, args = future.call.arguments) [13:13:35.718] } [13:13:35.718] Lazy evaluation: FALSE [13:13:35.718] Asynchronous evaluation: FALSE [13:13:35.718] Local evaluation: TRUE [13:13:35.718] Environment: R_GlobalEnv [13:13:35.718] Capture standard output: TRUE [13:13:35.718] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.718] Globals: 7 objects totaling 7.49 KiB (function '...future.FUN' of 0.98 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 6.40 KiB, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes, ...) [13:13:35.718] Packages: 1 packages ('tools') [13:13:35.718] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.718] Resolved: TRUE [13:13:35.718] Value: 224 bytes of class 'list' [13:13:35.718] Early signaling: FALSE [13:13:35.718] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.718] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.720] Chunk #1 of 1 ... DONE [13:13:35.720] Launching 1 futures (chunks) ... DONE [13:13:35.720] Resolving 1 futures (chunks) ... [13:13:35.721] - Number of value chunks collected: 1 [13:13:35.721] Resolving 1 futures (chunks) ... DONE [13:13:35.721] Reducing values from 1 chunks ... [13:13:35.721] - Number of values collected after concatenation: 4 [13:13:35.721] - Number of values expected: 4 [13:13:35.722] Reducing values from 1 chunks ... DONE [13:13:35.722] future_lapply() ... DONE List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 - future_lapply(x, ...) - passing '...' as a global ... List of 1 $ z0:List of 1 ..$ :List of 1 .. ..$ a: num 1 [13:13:35.726] future_lapply() ... [13:13:35.728] Number of chunks: 1 [13:13:35.728] getGlobalsAndPackagesXApply() ... [13:13:35.728] - future.globals: TRUE [13:13:35.731] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [13:13:35.731] - needed namespaces: [n=0] [13:13:35.731] Finding globals ... DONE [13:13:35.732] - use_args: TRUE [13:13:35.732] - Getting '...' globals ... [13:13:35.732] - '...' content: [n=0] [13:13:35.733] List of 1 [13:13:35.733] $ ...: list() [13:13:35.733] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.733] - attr(*, "where")=List of 1 [13:13:35.733] ..$ ...: [13:13:35.733] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.733] - attr(*, "resolved")= logi TRUE [13:13:35.733] - attr(*, "total_size")= num NA [13:13:35.736] - Getting '...' globals ... DONE [13:13:35.737] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [13:13:35.737] List of 3 [13:13:35.737] $ ...future.FUN :function (x) [13:13:35.737] $ future.call.arguments:List of 1 [13:13:35.737] ..$ a: num 1 [13:13:35.737] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.737] $ ... : list() [13:13:35.737] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.737] - attr(*, "where")=List of 3 [13:13:35.737] ..$ ...future.FUN : [13:13:35.737] ..$ future.call.arguments: [13:13:35.737] ..$ ... : [13:13:35.737] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.737] - attr(*, "resolved")= logi FALSE [13:13:35.737] - attr(*, "total_size")= num 1272 [13:13:35.743] Packages to be attached in all futures: [n=0] [13:13:35.743] getGlobalsAndPackagesXApply() ... DONE [13:13:35.743] Number of futures (= number of chunks): 1 [13:13:35.743] Launching 1 futures (chunks) ... [13:13:35.744] Chunk #1 of 1 ... [13:13:35.744] - Finding globals in 'X' for chunk #1 ... [13:13:35.744] + additional globals found: [n=0] [13:13:35.744] + additional namespaces needed: [n=0] [13:13:35.745] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.745] - seeds: [13:13:35.745] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.749] Created future: [13:13:35.749] SequentialFuture: [13:13:35.749] Label: 'future_lapply-1' [13:13:35.749] Expression: [13:13:35.749] { [13:13:35.749] do.call(function(...) { [13:13:35.749] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.749] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.749] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.749] on.exit(options(oopts), add = TRUE) [13:13:35.749] } [13:13:35.749] { [13:13:35.749] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.749] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.749] ...future.FUN(...future.X_jj) [13:13:35.749] }) [13:13:35.749] } [13:13:35.749] }, args = future.call.arguments) [13:13:35.749] } [13:13:35.749] Lazy evaluation: FALSE [13:13:35.749] Asynchronous evaluation: FALSE [13:13:35.749] Local evaluation: TRUE [13:13:35.749] Environment: 0x000001ff4821b028 [13:13:35.749] Capture standard output: TRUE [13:13:35.749] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.749] Globals: 5 objects totaling 1.30 KiB (function '...future.FUN' of 1.19 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:35.749] Packages: [13:13:35.749] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.749] Resolved: TRUE [13:13:35.749] Value: 56 bytes of class 'list' [13:13:35.749] Early signaling: FALSE [13:13:35.749] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.749] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.751] Chunk #1 of 1 ... DONE [13:13:35.751] Launching 1 futures (chunks) ... DONE [13:13:35.752] Resolving 1 futures (chunks) ... [13:13:35.752] - Number of value chunks collected: 1 [13:13:35.752] Resolving 1 futures (chunks) ... DONE [13:13:35.753] Reducing values from 1 chunks ... [13:13:35.753] - Number of values collected after concatenation: 1 [13:13:35.753] - Number of values expected: 1 [13:13:35.753] Reducing values from 1 chunks ... DONE [13:13:35.753] future_lapply() ... DONE List of 1 $ z1:List of 1 ..$ :List of 1 .. ..$ a: num 1 - future_lapply(X, ...) - '{ a <- a + 1; a }' ... [13:13:35.755] future_lapply() ... [13:13:35.757] Number of chunks: 1 [13:13:35.757] getGlobalsAndPackagesXApply() ... [13:13:35.757] - future.globals: TRUE [13:13:35.760] - globals found/used: [n=2] 'FUN', 'a' [13:13:35.761] - needed namespaces: [n=0] [13:13:35.761] Finding globals ... DONE [13:13:35.761] - use_args: TRUE [13:13:35.761] - Getting '...' globals ... [13:13:35.762] - '...' content: [n=0] [13:13:35.762] List of 1 [13:13:35.762] $ ...: list() [13:13:35.762] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.762] - attr(*, "where")=List of 1 [13:13:35.762] ..$ ...: [13:13:35.762] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.762] - attr(*, "resolved")= logi TRUE [13:13:35.762] - attr(*, "total_size")= num NA [13:13:35.766] - Getting '...' globals ... DONE [13:13:35.766] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [13:13:35.766] List of 3 [13:13:35.766] $ ...future.FUN:function (ii) [13:13:35.766] $ a : num 1 [13:13:35.766] $ ... : list() [13:13:35.766] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.766] - attr(*, "where")=List of 3 [13:13:35.766] ..$ ...future.FUN: [13:13:35.766] ..$ a : [13:13:35.766] ..$ ... : [13:13:35.766] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.766] - attr(*, "resolved")= logi FALSE [13:13:35.766] - attr(*, "total_size")= num 2984 [13:13:35.771] Packages to be attached in all futures: [n=0] [13:13:35.771] getGlobalsAndPackagesXApply() ... DONE [13:13:35.771] Number of futures (= number of chunks): 1 [13:13:35.771] Launching 1 futures (chunks) ... [13:13:35.772] Chunk #1 of 1 ... [13:13:35.772] - Finding globals in 'X' for chunk #1 ... [13:13:35.772] + additional globals found: [n=0] [13:13:35.773] + additional namespaces needed: [n=0] [13:13:35.773] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.773] - seeds: [13:13:35.773] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.776] Created future: [13:13:35.777] SequentialFuture: [13:13:35.777] Label: 'future_lapply-1' [13:13:35.777] Expression: [13:13:35.777] { [13:13:35.777] do.call(function(...) { [13:13:35.777] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.777] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.777] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.777] on.exit(options(oopts), add = TRUE) [13:13:35.777] } [13:13:35.777] { [13:13:35.777] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.777] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.777] ...future.FUN(...future.X_jj, ...) [13:13:35.777] }) [13:13:35.777] } [13:13:35.777] }, args = future.call.arguments) [13:13:35.777] } [13:13:35.777] Lazy evaluation: FALSE [13:13:35.777] Asynchronous evaluation: FALSE [13:13:35.777] Local evaluation: TRUE [13:13:35.777] Environment: R_GlobalEnv [13:13:35.777] Capture standard output: TRUE [13:13:35.777] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.777] Globals: 6 objects totaling 2.97 KiB (function '...future.FUN' of 2.86 KiB, numeric 'a' of 56 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:35.777] Packages: [13:13:35.777] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.777] Resolved: TRUE [13:13:35.777] Value: 56 bytes of class 'list' [13:13:35.777] Early signaling: FALSE [13:13:35.777] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.777] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.778] Chunk #1 of 1 ... DONE [13:13:35.778] Launching 1 futures (chunks) ... DONE [13:13:35.778] Resolving 1 futures (chunks) ... [13:13:35.779] - Number of value chunks collected: 1 [13:13:35.779] Resolving 1 futures (chunks) ... DONE [13:13:35.779] Reducing values from 1 chunks ... [13:13:35.780] - Number of values collected after concatenation: 1 [13:13:35.780] - Number of values expected: 1 [13:13:35.780] Reducing values from 1 chunks ... DONE [13:13:35.780] future_lapply() ... DONE - future_lapply(X, ...) - '{ a; a <- a + 1 }' ... [13:13:35.780] future_lapply() ... [13:13:35.782] Number of chunks: 1 [13:13:35.782] getGlobalsAndPackagesXApply() ... [13:13:35.782] - future.globals: TRUE [13:13:35.785] - globals found/used: [n=2] 'FUN', 'a' [13:13:35.785] - needed namespaces: [n=0] [13:13:35.785] Finding globals ... DONE [13:13:35.785] - use_args: TRUE [13:13:35.785] - Getting '...' globals ... [13:13:35.786] - '...' content: [n=0] [13:13:35.786] List of 1 [13:13:35.786] $ ...: list() [13:13:35.786] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.786] - attr(*, "where")=List of 1 [13:13:35.786] ..$ ...: [13:13:35.786] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.786] - attr(*, "resolved")= logi TRUE [13:13:35.786] - attr(*, "total_size")= num NA [13:13:35.789] - Getting '...' globals ... DONE [13:13:35.790] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [13:13:35.790] List of 3 [13:13:35.790] $ ...future.FUN:function (ii) [13:13:35.790] $ a : num 1 [13:13:35.790] $ ... : list() [13:13:35.790] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.790] - attr(*, "where")=List of 3 [13:13:35.790] ..$ ...future.FUN: [13:13:35.790] ..$ a : [13:13:35.790] ..$ ... : [13:13:35.790] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.790] - attr(*, "resolved")= logi FALSE [13:13:35.790] - attr(*, "total_size")= num 2984 [13:13:35.797] Packages to be attached in all futures: [n=0] [13:13:35.797] getGlobalsAndPackagesXApply() ... DONE [13:13:35.797] Number of futures (= number of chunks): 1 [13:13:35.798] Launching 1 futures (chunks) ... [13:13:35.798] Chunk #1 of 1 ... [13:13:35.798] - Finding globals in 'X' for chunk #1 ... [13:13:35.798] + additional globals found: [n=0] [13:13:35.799] + additional namespaces needed: [n=0] [13:13:35.799] - Finding globals in 'X' for chunk #1 ... DONE [13:13:35.799] - seeds: [13:13:35.799] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.802] Created future: [13:13:35.803] SequentialFuture: [13:13:35.803] Label: 'future_lapply-1' [13:13:35.803] Expression: [13:13:35.803] { [13:13:35.803] do.call(function(...) { [13:13:35.803] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.803] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.803] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.803] on.exit(options(oopts), add = TRUE) [13:13:35.803] } [13:13:35.803] { [13:13:35.803] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.803] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.803] ...future.FUN(...future.X_jj, ...) [13:13:35.803] }) [13:13:35.803] } [13:13:35.803] }, args = future.call.arguments) [13:13:35.803] } [13:13:35.803] Lazy evaluation: FALSE [13:13:35.803] Asynchronous evaluation: FALSE [13:13:35.803] Local evaluation: TRUE [13:13:35.803] Environment: R_GlobalEnv [13:13:35.803] Capture standard output: TRUE [13:13:35.803] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.803] Globals: 6 objects totaling 2.97 KiB (function '...future.FUN' of 2.86 KiB, numeric 'a' of 56 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:35.803] Packages: [13:13:35.803] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.803] Resolved: TRUE [13:13:35.803] Value: 56 bytes of class 'list' [13:13:35.803] Early signaling: FALSE [13:13:35.803] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.803] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.804] Chunk #1 of 1 ... DONE [13:13:35.804] Launching 1 futures (chunks) ... DONE [13:13:35.804] Resolving 1 futures (chunks) ... [13:13:35.805] - Number of value chunks collected: 1 [13:13:35.805] Resolving 1 futures (chunks) ... DONE [13:13:35.805] Reducing values from 1 chunks ... [13:13:35.805] - Number of values collected after concatenation: 1 [13:13:35.805] - Number of values expected: 1 [13:13:35.806] Reducing values from 1 chunks ... DONE [13:13:35.806] future_lapply() ... DONE - future_lapply(..., future.globals = ) ... [13:13:35.806] future_lapply() ... [13:13:35.807] Number of chunks: 1 [13:13:35.807] getGlobalsAndPackagesXApply() ... [13:13:35.807] - future.globals: with names '42' [13:13:35.807] - use_args: TRUE [13:13:35.808] - Getting '...' globals ... [13:13:35.808] - '...' content: [n=0] [13:13:35.808] List of 1 [13:13:35.808] $ ...: list() [13:13:35.808] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.808] - attr(*, "where")=List of 1 [13:13:35.808] ..$ ...: [13:13:35.808] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.808] - attr(*, "resolved")= logi TRUE [13:13:35.808] - attr(*, "total_size")= num NA [13:13:35.811] - Getting '...' globals ... DONE [13:13:35.812] Globals to be used in all futures (chunks): [n=3] 'a', '...future.FUN', '...' [13:13:35.812] List of 3 [13:13:35.812] $ a : num 42 [13:13:35.812] $ ...future.FUN:function (x) [13:13:35.812] $ ... : list() [13:13:35.812] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:35.812] - attr(*, "where")=List of 3 [13:13:35.812] ..$ a : [13:13:35.812] ..$ ...future.FUN: [13:13:35.812] ..$ ... : [13:13:35.812] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:35.812] - attr(*, "resolved")= logi FALSE [13:13:35.812] - attr(*, "total_size")= num NA [13:13:35.816] Packages to be attached in all futures: [n=0] [13:13:35.816] getGlobalsAndPackagesXApply() ... DONE [13:13:35.816] Number of futures (= number of chunks): 1 [13:13:35.817] Launching 1 futures (chunks) ... [13:13:35.817] Chunk #1 of 1 ... [13:13:35.817] - seeds: [13:13:35.817] - All globals exported: [n=6] 'a', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:35.821] Created future: [13:13:35.821] SequentialFuture: [13:13:35.821] Label: 'future_lapply-1' [13:13:35.821] Expression: [13:13:35.821] { [13:13:35.821] do.call(function(...) { [13:13:35.821] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:35.821] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:35.821] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:35.821] on.exit(options(oopts), add = TRUE) [13:13:35.821] } [13:13:35.821] { [13:13:35.821] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:35.821] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:35.821] ...future.FUN(...future.X_jj, ...) [13:13:35.821] }) [13:13:35.821] } [13:13:35.821] }, args = future.call.arguments) [13:13:35.821] } [13:13:35.821] Lazy evaluation: FALSE [13:13:35.821] Asynchronous evaluation: FALSE [13:13:35.821] Local evaluation: TRUE [13:13:35.821] Environment: R_GlobalEnv [13:13:35.821] Capture standard output: TRUE [13:13:35.821] Capture condition classes: 'condition' (excluding 'nothing') [13:13:35.821] Globals: 6 objects totaling 1.45 KiB (numeric 'a' of 56 bytes, function '...future.FUN' of 1.34 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:35.821] Packages: [13:13:35.821] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:35.821] Resolved: TRUE [13:13:35.821] Value: 56 bytes of class 'list' [13:13:35.821] Early signaling: FALSE [13:13:35.821] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:35.821] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [13:13:35.823] Chunk #1 of 1 ... DONE [13:13:35.823] Launching 1 futures (chunks) ... DONE [13:13:35.823] Resolving 1 futures (chunks) ... [13:13:35.824] - Number of value chunks collected: 1 [13:13:35.824] Resolving 1 futures (chunks) ... DONE [13:13:35.824] Reducing values from 1 chunks ... [13:13:35.824] - Number of values collected after concatenation: 1 [13:13:35.824] - Number of values expected: 1 [13:13:35.825] Reducing values from 1 chunks ... DONE [13:13:35.825] future_lapply() ... DONE List of 1 $ : num 42 [13:13:36.163] future_lapply() ... [13:13:36.171] Number of chunks: 2 [13:13:36.171] getGlobalsAndPackagesXApply() ... [13:13:36.172] - future.globals: TRUE [13:13:36.182] - globals found/used: [n=5] 'FUN', 'caller', 'args', 'call_my_add', 'my_add' [13:13:36.182] - needed namespaces: [n=0] [13:13:36.183] Finding globals ... DONE [13:13:36.183] - use_args: TRUE [13:13:36.183] - Getting '...' globals ... [13:13:36.184] - '...' content: [n=0] [13:13:36.184] List of 1 [13:13:36.184] $ ...: list() [13:13:36.184] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.184] - attr(*, "where")=List of 1 [13:13:36.184] ..$ ...: [13:13:36.184] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.184] - attr(*, "resolved")= logi TRUE [13:13:36.184] - attr(*, "total_size")= num NA [13:13:36.190] - Getting '...' globals ... DONE [13:13:36.191] Globals to be used in all futures (chunks): [n=6] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...' [13:13:36.191] List of 6 [13:13:36.191] $ ...future.FUN:function (i) [13:13:36.191] $ caller :function (a, b, FUN = call_my_add) [13:13:36.191] $ args :List of 1 [13:13:36.191] ..$ FUN:function (a, b) [13:13:36.191] $ call_my_add :function (a, b) [13:13:36.191] $ my_add :function (a, b) [13:13:36.191] $ ... : list() [13:13:36.191] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.191] - attr(*, "where")=List of 6 [13:13:36.191] ..$ ...future.FUN: [13:13:36.191] ..$ caller : [13:13:36.191] ..$ args : [13:13:36.191] ..$ call_my_add : [13:13:36.191] ..$ my_add : [13:13:36.191] ..$ ... : [13:13:36.191] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.191] - attr(*, "resolved")= logi FALSE [13:13:36.191] - attr(*, "total_size")= num 24120 [13:13:36.205] Packages to be attached in all futures: [n=0] [13:13:36.206] getGlobalsAndPackagesXApply() ... DONE [13:13:36.206] Number of futures (= number of chunks): 2 [13:13:36.206] Launching 2 futures (chunks) ... [13:13:36.207] Chunk #1 of 2 ... [13:13:36.207] - Finding globals in 'X' for chunk #1 ... [13:13:36.208] + additional globals found: [n=0] [13:13:36.208] + additional namespaces needed: [n=0] [13:13:36.208] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.208] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:36.209] - seeds: [13:13:36.209] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.231] Created future: [13:13:36.231] MultisessionFuture: [13:13:36.231] Label: 'future_lapply-1' [13:13:36.231] Expression: [13:13:36.231] { [13:13:36.231] do.call(function(...) { [13:13:36.231] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.231] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.231] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.231] on.exit(options(oopts), add = TRUE) [13:13:36.231] } [13:13:36.231] { [13:13:36.231] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.231] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.231] ...future.FUN(...future.X_jj, ...) [13:13:36.231] }) [13:13:36.231] } [13:13:36.231] }, args = future.call.arguments) [13:13:36.231] } [13:13:36.231] Lazy evaluation: FALSE [13:13:36.231] Asynchronous evaluation: TRUE [13:13:36.231] Local evaluation: TRUE [13:13:36.231] Environment: 0x000001ff43d52d80 [13:13:36.231] Capture standard output: TRUE [13:13:36.231] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.231] Globals: 9 objects totaling 23.61 KiB (function '...future.FUN' of 9.20 KiB, function 'caller' of 1.48 KiB, list 'args' of 5.72 KiB, function 'call_my_add' of 5.72 KiB, function 'my_add' of 1.44 KiB, ...) [13:13:36.231] Packages: [13:13:36.231] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.231] Resolved: TRUE [13:13:36.231] Value: [13:13:36.231] Conditions captured: [13:13:36.231] Early signaling: FALSE [13:13:36.231] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.231] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.250] Chunk #1 of 2 ... DONE [13:13:36.250] Chunk #2 of 2 ... [13:13:36.250] - Finding globals in 'X' for chunk #2 ... [13:13:36.251] + additional globals found: [n=0] [13:13:36.251] + additional namespaces needed: [n=0] [13:13:36.251] - Finding globals in 'X' for chunk #2 ... DONE [13:13:36.251] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:36.251] - seeds: [13:13:36.252] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.274] Created future: [13:13:36.274] MultisessionFuture: [13:13:36.274] Label: 'future_lapply-2' [13:13:36.274] Expression: [13:13:36.274] { [13:13:36.274] do.call(function(...) { [13:13:36.274] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.274] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.274] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.274] on.exit(options(oopts), add = TRUE) [13:13:36.274] } [13:13:36.274] { [13:13:36.274] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.274] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.274] ...future.FUN(...future.X_jj, ...) [13:13:36.274] }) [13:13:36.274] } [13:13:36.274] }, args = future.call.arguments) [13:13:36.274] } [13:13:36.274] Lazy evaluation: FALSE [13:13:36.274] Asynchronous evaluation: TRUE [13:13:36.274] Local evaluation: TRUE [13:13:36.274] Environment: 0x000001ff43d52d80 [13:13:36.274] Capture standard output: TRUE [13:13:36.274] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.274] Globals: 9 objects totaling 23.66 KiB (function '...future.FUN' of 9.20 KiB, function 'caller' of 1.48 KiB, list 'args' of 5.72 KiB, function 'call_my_add' of 5.72 KiB, function 'my_add' of 1.44 KiB, ...) [13:13:36.274] Packages: [13:13:36.274] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.274] Resolved: TRUE [13:13:36.274] Value: [13:13:36.274] Conditions captured: [13:13:36.274] Early signaling: FALSE [13:13:36.274] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.274] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.293] Chunk #2 of 2 ... DONE [13:13:36.293] Launching 2 futures (chunks) ... DONE [13:13:36.293] Resolving 2 futures (chunks) ... [13:13:36.294] - Number of value chunks collected: 2 [13:13:36.295] Resolving 2 futures (chunks) ... DONE [13:13:36.295] Reducing values from 2 chunks ... [13:13:36.295] - Number of values collected after concatenation: 3 [13:13:36.295] - Number of values expected: 3 [13:13:36.295] Reducing values from 2 chunks ... DONE [13:13:36.296] future_lapply() ... DONE - future_lapply(x, FUN = do.call, ...) ... [13:13:36.296] future_lapply() ... [13:13:36.302] Number of chunks: 1 [13:13:36.302] getGlobalsAndPackagesXApply() ... [13:13:36.302] - future.globals: TRUE [13:13:36.309] - globals found/used: [n=1] 'FUN' [13:13:36.309] - needed namespaces: [n=0] [13:13:36.309] Finding globals ... DONE [13:13:36.309] - use_args: TRUE [13:13:36.310] - Getting '...' globals ... [13:13:36.311] - '...' content: [n=1] 'what' [13:13:36.311] List of 1 [13:13:36.311] $ ...:List of 1 [13:13:36.311] ..$ what:function (x) [13:13:36.311] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.311] - attr(*, "where")=List of 1 [13:13:36.311] ..$ ...: [13:13:36.311] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.311] - attr(*, "resolved")= logi TRUE [13:13:36.311] - attr(*, "total_size")= num NA [13:13:36.316] - Getting '...' globals ... DONE [13:13:36.316] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.317] List of 2 [13:13:36.317] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [13:13:36.317] $ ... :List of 1 [13:13:36.317] ..$ what:function (x) [13:13:36.317] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.317] - attr(*, "where")=List of 2 [13:13:36.317] ..$ ...future.FUN: [13:13:36.317] ..$ ... : [13:13:36.317] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.317] - attr(*, "resolved")= logi FALSE [13:13:36.317] - attr(*, "total_size")= num 12192 [13:13:36.322] Packages to be attached in all futures: [n=0] [13:13:36.322] getGlobalsAndPackagesXApply() ... DONE [13:13:36.322] Number of futures (= number of chunks): 1 [13:13:36.323] Launching 1 futures (chunks) ... [13:13:36.323] Chunk #1 of 1 ... [13:13:36.323] - Finding globals in 'X' for chunk #1 ... [13:13:36.324] + additional globals found: [n=0] [13:13:36.324] + additional namespaces needed: [n=0] [13:13:36.324] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.324] - seeds: [13:13:36.325] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.344] Created future: [13:13:36.344] MultisessionFuture: [13:13:36.344] Label: 'future_lapply-1' [13:13:36.344] Expression: [13:13:36.344] { [13:13:36.344] do.call(function(...) { [13:13:36.344] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.344] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.344] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.344] on.exit(options(oopts), add = TRUE) [13:13:36.344] } [13:13:36.344] { [13:13:36.344] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.344] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.344] ...future.FUN(...future.X_jj, ...) [13:13:36.344] }) [13:13:36.344] } [13:13:36.344] }, args = future.call.arguments) [13:13:36.344] } [13:13:36.344] Lazy evaluation: FALSE [13:13:36.344] Asynchronous evaluation: TRUE [13:13:36.344] Local evaluation: TRUE [13:13:36.344] Environment: R_GlobalEnv [13:13:36.344] Capture standard output: TRUE [13:13:36.344] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.344] Globals: 5 objects totaling 11.96 KiB (function '...future.FUN' of 11.85 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.344] Packages: [13:13:36.344] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.344] Resolved: TRUE [13:13:36.344] Value: [13:13:36.344] Conditions captured: [13:13:36.344] Early signaling: FALSE [13:13:36.344] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.344] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.360] Chunk #1 of 1 ... DONE [13:13:36.360] Launching 1 futures (chunks) ... DONE [13:13:36.360] Resolving 1 futures (chunks) ... [13:13:36.361] - Number of value chunks collected: 1 [13:13:36.361] Resolving 1 futures (chunks) ... DONE [13:13:36.362] Reducing values from 1 chunks ... [13:13:36.362] - Number of values collected after concatenation: 1 [13:13:36.362] - Number of values expected: 1 [13:13:36.362] Reducing values from 1 chunks ... DONE [13:13:36.362] future_lapply() ... DONE [13:13:36.362] future_lapply() ... [13:13:36.367] Number of chunks: 1 [13:13:36.368] getGlobalsAndPackagesXApply() ... [13:13:36.368] - future.globals: TRUE [13:13:36.372] - globals found/used: [n=1] 'FUN' [13:13:36.373] - needed namespaces: [n=0] [13:13:36.373] Finding globals ... DONE [13:13:36.373] - use_args: TRUE [13:13:36.373] - Getting '...' globals ... [13:13:36.374] - '...' content: [n=1] 'what' [13:13:36.374] List of 1 [13:13:36.374] $ ...:List of 1 [13:13:36.374] ..$ what:function (...) [13:13:36.374] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.374] - attr(*, "where")=List of 1 [13:13:36.374] ..$ ...: [13:13:36.374] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.374] - attr(*, "resolved")= logi TRUE [13:13:36.374] - attr(*, "total_size")= num NA [13:13:36.379] - Getting '...' globals ... DONE [13:13:36.379] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.379] List of 2 [13:13:36.379] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [13:13:36.379] $ ... :List of 1 [13:13:36.379] ..$ what:function (...) [13:13:36.379] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.379] - attr(*, "where")=List of 2 [13:13:36.379] ..$ ...future.FUN: [13:13:36.379] ..$ ... : [13:13:36.379] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.379] - attr(*, "resolved")= logi FALSE [13:13:36.379] - attr(*, "total_size")= num 13352 [13:13:36.388] Packages to be attached in all futures: [n=0] [13:13:36.389] getGlobalsAndPackagesXApply() ... DONE [13:13:36.389] Number of futures (= number of chunks): 1 [13:13:36.389] Launching 1 futures (chunks) ... [13:13:36.390] Chunk #1 of 1 ... [13:13:36.390] - Finding globals in 'X' for chunk #1 ... [13:13:36.391] + additional globals found: [n=0] [13:13:36.391] + additional namespaces needed: [n=0] [13:13:36.391] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.391] - seeds: [13:13:36.392] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.411] Created future: [13:13:36.411] MultisessionFuture: [13:13:36.411] Label: 'future_lapply-1' [13:13:36.411] Expression: [13:13:36.411] { [13:13:36.411] do.call(function(...) { [13:13:36.411] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.411] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.411] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.411] on.exit(options(oopts), add = TRUE) [13:13:36.411] } [13:13:36.411] { [13:13:36.411] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.411] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.411] ...future.FUN(...future.X_jj, ...) [13:13:36.411] }) [13:13:36.411] } [13:13:36.411] }, args = future.call.arguments) [13:13:36.411] } [13:13:36.411] Lazy evaluation: FALSE [13:13:36.411] Asynchronous evaluation: TRUE [13:13:36.411] Local evaluation: TRUE [13:13:36.411] Environment: R_GlobalEnv [13:13:36.411] Capture standard output: TRUE [13:13:36.411] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.411] Globals: 5 objects totaling 13.09 KiB (function '...future.FUN' of 11.85 KiB, DotDotDotList 'future.call.arguments' of 1.19 KiB, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.411] Packages: [13:13:36.411] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.411] Resolved: TRUE [13:13:36.411] Value: [13:13:36.411] Conditions captured: [13:13:36.411] Early signaling: FALSE [13:13:36.411] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.411] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.429] Chunk #1 of 1 ... DONE [13:13:36.429] Launching 1 futures (chunks) ... DONE [13:13:36.429] Resolving 1 futures (chunks) ... [13:13:36.430] - Number of value chunks collected: 1 [13:13:36.430] Resolving 1 futures (chunks) ... DONE [13:13:36.430] Reducing values from 1 chunks ... [13:13:36.430] - Number of values collected after concatenation: 1 [13:13:36.430] - Number of values expected: 1 [13:13:36.431] Reducing values from 1 chunks ... DONE [13:13:36.431] future_lapply() ... DONE - future_lapply(x, ...) - passing arguments via '...' ... [13:13:36.431] future_lapply() ... [13:13:36.435] Number of chunks: 1 [13:13:36.435] getGlobalsAndPackagesXApply() ... [13:13:36.435] - future.globals: TRUE [13:13:36.438] - globals found/used: [n=1] 'FUN' [13:13:36.438] - needed namespaces: [n=0] [13:13:36.439] Finding globals ... DONE [13:13:36.439] - use_args: TRUE [13:13:36.439] - Getting '...' globals ... [13:13:36.440] - '...' content: [n=1] 'b' [13:13:36.440] List of 1 [13:13:36.440] $ ...:List of 1 [13:13:36.440] ..$ b:'data.frame': 2 obs. of 1 variable: [13:13:36.440] .. ..$ a: int [1:2] 1 2 [13:13:36.440] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.440] - attr(*, "where")=List of 1 [13:13:36.440] ..$ ...: [13:13:36.440] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.440] - attr(*, "resolved")= logi TRUE [13:13:36.440] - attr(*, "total_size")= num NA [13:13:36.446] - Getting '...' globals ... DONE [13:13:36.446] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.446] List of 2 [13:13:36.446] $ ...future.FUN:function (a, b) [13:13:36.446] $ ... :List of 1 [13:13:36.446] ..$ b:'data.frame': 2 obs. of 1 variable: [13:13:36.446] .. ..$ a: int [1:2] 1 2 [13:13:36.446] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.446] - attr(*, "where")=List of 2 [13:13:36.446] ..$ ...future.FUN: [13:13:36.446] ..$ ... : [13:13:36.446] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.446] - attr(*, "resolved")= logi FALSE [13:13:36.446] - attr(*, "total_size")= num 1440 [13:13:36.453] Packages to be attached in all futures: [n=0] [13:13:36.453] getGlobalsAndPackagesXApply() ... DONE [13:13:36.454] Number of futures (= number of chunks): 1 [13:13:36.454] Launching 1 futures (chunks) ... [13:13:36.454] Chunk #1 of 1 ... [13:13:36.454] - Finding globals in 'X' for chunk #1 ... [13:13:36.455] + additional globals found: [n=0] [13:13:36.455] + additional namespaces needed: [n=0] [13:13:36.455] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.455] - seeds: [13:13:36.456] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.474] Created future: [13:13:36.474] MultisessionFuture: [13:13:36.474] Label: 'future_lapply-1' [13:13:36.474] Expression: [13:13:36.474] { [13:13:36.474] do.call(function(...) { [13:13:36.474] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.474] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.474] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.474] on.exit(options(oopts), add = TRUE) [13:13:36.474] } [13:13:36.474] { [13:13:36.474] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.474] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.474] ...future.FUN(...future.X_jj, ...) [13:13:36.474] }) [13:13:36.474] } [13:13:36.474] }, args = future.call.arguments) [13:13:36.474] } [13:13:36.474] Lazy evaluation: FALSE [13:13:36.474] Asynchronous evaluation: TRUE [13:13:36.474] Local evaluation: TRUE [13:13:36.474] Environment: R_GlobalEnv [13:13:36.474] Capture standard output: TRUE [13:13:36.474] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.474] Globals: 5 objects totaling 1.52 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.474] Packages: [13:13:36.474] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.474] Resolved: TRUE [13:13:36.474] Value: [13:13:36.474] Conditions captured: [13:13:36.474] Early signaling: FALSE [13:13:36.474] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.474] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.492] Chunk #1 of 1 ... DONE [13:13:36.492] Launching 1 futures (chunks) ... DONE [13:13:36.492] Resolving 1 futures (chunks) ... [13:13:36.493] - Number of value chunks collected: 1 [13:13:36.493] Resolving 1 futures (chunks) ... DONE [13:13:36.493] Reducing values from 1 chunks ... [13:13:36.493] - Number of values collected after concatenation: 1 [13:13:36.493] - Number of values expected: 1 [13:13:36.494] Reducing values from 1 chunks ... DONE [13:13:36.494] future_lapply() ... DONE [13:13:36.494] future_lapply() ... [13:13:36.497] Number of chunks: 1 [13:13:36.497] getGlobalsAndPackagesXApply() ... [13:13:36.498] - future.globals: TRUE [13:13:36.500] - globals found/used: [n=1] 'FUN' [13:13:36.501] - needed namespaces: [n=0] [13:13:36.501] Finding globals ... DONE [13:13:36.501] - use_args: TRUE [13:13:36.501] - Getting '...' globals ... [13:13:36.502] - '...' content: [n=1] 'b' [13:13:36.502] List of 1 [13:13:36.502] $ ...:List of 1 [13:13:36.502] ..$ b: [13:13:36.502] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.502] - attr(*, "where")=List of 1 [13:13:36.502] ..$ ...: [13:13:36.502] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.502] - attr(*, "resolved")= logi TRUE [13:13:36.502] - attr(*, "total_size")= num NA [13:13:36.507] - Getting '...' globals ... DONE [13:13:36.507] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.507] List of 2 [13:13:36.507] $ ...future.FUN:function (a, b) [13:13:36.507] $ ... :List of 1 [13:13:36.507] ..$ b: [13:13:36.507] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.507] - attr(*, "where")=List of 2 [13:13:36.507] ..$ ...future.FUN: [13:13:36.507] ..$ ... : [13:13:36.507] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.507] - attr(*, "resolved")= logi FALSE [13:13:36.507] - attr(*, "total_size")= num 1440 [13:13:36.513] Packages to be attached in all futures: [n=0] [13:13:36.513] getGlobalsAndPackagesXApply() ... DONE [13:13:36.513] Number of futures (= number of chunks): 1 [13:13:36.513] Launching 1 futures (chunks) ... [13:13:36.514] Chunk #1 of 1 ... [13:13:36.514] - Finding globals in 'X' for chunk #1 ... [13:13:36.514] + additional globals found: [n=0] [13:13:36.515] + additional namespaces needed: [n=0] [13:13:36.515] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.515] - seeds: [13:13:36.515] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.533] Created future: [13:13:36.534] MultisessionFuture: [13:13:36.534] Label: 'future_lapply-1' [13:13:36.534] Expression: [13:13:36.534] { [13:13:36.534] do.call(function(...) { [13:13:36.534] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.534] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.534] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.534] on.exit(options(oopts), add = TRUE) [13:13:36.534] } [13:13:36.534] { [13:13:36.534] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.534] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.534] ...future.FUN(...future.X_jj, ...) [13:13:36.534] }) [13:13:36.534] } [13:13:36.534] }, args = future.call.arguments) [13:13:36.534] } [13:13:36.534] Lazy evaluation: FALSE [13:13:36.534] Asynchronous evaluation: TRUE [13:13:36.534] Local evaluation: TRUE [13:13:36.534] Environment: R_GlobalEnv [13:13:36.534] Capture standard output: TRUE [13:13:36.534] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.534] Globals: 5 objects totaling 1.46 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.534] Packages: [13:13:36.534] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.534] Resolved: TRUE [13:13:36.534] Value: [13:13:36.534] Conditions captured: [13:13:36.534] Early signaling: FALSE [13:13:36.534] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.534] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.550] Chunk #1 of 1 ... DONE [13:13:36.550] Launching 1 futures (chunks) ... DONE [13:13:36.550] Resolving 1 futures (chunks) ... [13:13:36.551] - Number of value chunks collected: 1 [13:13:36.551] Resolving 1 futures (chunks) ... DONE [13:13:36.551] Reducing values from 1 chunks ... [13:13:36.551] - Number of values collected after concatenation: 1 [13:13:36.552] - Number of values expected: 1 [13:13:36.552] Reducing values from 1 chunks ... DONE [13:13:36.552] future_lapply() ... DONE [13:13:36.552] future_lapply() ... [13:13:36.555] Number of chunks: 1 [13:13:36.555] getGlobalsAndPackagesXApply() ... [13:13:36.556] - future.globals: TRUE [13:13:36.559] - globals found/used: [n=1] 'FUN' [13:13:36.559] - needed namespaces: [n=0] [13:13:36.560] Finding globals ... DONE [13:13:36.560] - use_args: TRUE [13:13:36.560] - Getting '...' globals ... [13:13:36.561] - '...' content: [n=1] 'b' [13:13:36.561] List of 1 [13:13:36.561] $ ...:List of 1 [13:13:36.561] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [13:13:36.561] .. .. ..@ slots :List of 4 [13:13:36.561] .. .. .. ..$ .Data : chr "function" [13:13:36.561] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. ..$ target : chr "signature" [13:13:36.561] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. ..$ defined: chr "signature" [13:13:36.561] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. ..$ generic: chr "character" [13:13:36.561] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. ..@ contains :List of 3 [13:13:36.561] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "function" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr "function" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 2 [13:13:36.561] .. .. ..@ virtual : logi FALSE [13:13:36.561] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [13:13:36.561] list() [13:13:36.561] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [13:13:36.561] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:36.561] .. .. .. .. .. .. ..@ names : chr(0) [13:13:36.561] .. .. .. .. .. .. ..@ package: chr(0) [13:13:36.561] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [13:13:36.561] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:36.561] .. .. .. .. .. .. ..@ names : chr(0) [13:13:36.561] .. .. .. .. .. .. ..@ package: chr(0) [13:13:36.561] .. .. .. .. ..$ generic: chr(0) [13:13:36.561] .. .. ..@ validity : NULL [13:13:36.561] .. .. ..@ access : list() [13:13:36.561] .. .. ..@ className : chr "MethodDefinition" [13:13:36.561] .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. ..@ package : chr "methods" [13:13:36.561] .. .. ..@ subclasses:List of 7 [13:13:36.561] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr(0) [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 1 [13:13:36.561] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 2 [13:13:36.561] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr "MethodWithNext" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 2 [13:13:36.561] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.561] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.561] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.561] .. .. .. .. .. ..@ test :function (object) [13:13:36.561] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.561] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.561] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:36.561] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.561] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.561] .. .. .. .. .. ..@ distance : num 2 [13:13:36.561] .. .. ..@ versionKey: [13:13:36.561] .. .. ..@ sealed : logi TRUE [13:13:36.561] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.561] - attr(*, "where")=List of 1 [13:13:36.561] ..$ ...: [13:13:36.561] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.561] - attr(*, "resolved")= logi TRUE [13:13:36.561] - attr(*, "total_size")= num NA [13:13:36.646] - Getting '...' globals ... DONE [13:13:36.646] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.646] List of 2 [13:13:36.646] $ ...future.FUN:function (a, b) [13:13:36.646] $ ... :List of 1 [13:13:36.646] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [13:13:36.646] .. .. ..@ slots :List of 4 [13:13:36.646] .. .. .. ..$ .Data : chr "function" [13:13:36.646] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. ..$ target : chr "signature" [13:13:36.646] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. ..$ defined: chr "signature" [13:13:36.646] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. ..$ generic: chr "character" [13:13:36.646] .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. ..@ contains :List of 3 [13:13:36.646] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "function" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr "function" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 2 [13:13:36.646] .. .. ..@ virtual : logi FALSE [13:13:36.646] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [13:13:36.646] list() [13:13:36.646] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [13:13:36.646] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:36.646] .. .. .. .. .. .. ..@ names : chr(0) [13:13:36.646] .. .. .. .. .. .. ..@ package: chr(0) [13:13:36.646] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [13:13:36.646] .. .. .. .. .. .. ..@ .Data : chr(0) [13:13:36.646] .. .. .. .. .. .. ..@ names : chr(0) [13:13:36.646] .. .. .. .. .. .. ..@ package: chr(0) [13:13:36.646] .. .. .. .. ..$ generic: chr(0) [13:13:36.646] .. .. ..@ validity : NULL [13:13:36.646] .. .. ..@ access : list() [13:13:36.646] .. .. ..@ className : chr "MethodDefinition" [13:13:36.646] .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. ..@ package : chr "methods" [13:13:36.646] .. .. ..@ subclasses:List of 7 [13:13:36.646] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr(0) [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 1 [13:13:36.646] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 2 [13:13:36.646] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr "MethodWithNext" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 2 [13:13:36.646] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [13:13:36.646] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ package : chr "methods" [13:13:36.646] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [13:13:36.646] .. .. .. .. .. ..@ test :function (object) [13:13:36.646] .. .. .. .. .. ..@ replace :function (from, to, value) [13:13:36.646] .. .. .. .. .. ..@ simple : logi TRUE [13:13:36.646] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [13:13:36.646] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [13:13:36.646] .. .. .. .. .. ..@ dataPart : logi FALSE [13:13:36.646] .. .. .. .. .. ..@ distance : num 2 [13:13:36.646] .. .. ..@ versionKey: [13:13:36.646] .. .. ..@ sealed : logi TRUE [13:13:36.646] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.646] - attr(*, "where")=List of 2 [13:13:36.646] ..$ ...future.FUN: [13:13:36.646] ..$ ... : [13:13:36.646] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.646] - attr(*, "resolved")= logi FALSE [13:13:36.646] - attr(*, "total_size")= num 405168 [13:13:36.726] Packages to be attached in all futures: [n=0] [13:13:36.726] getGlobalsAndPackagesXApply() ... DONE [13:13:36.727] Number of futures (= number of chunks): 1 [13:13:36.727] Launching 1 futures (chunks) ... [13:13:36.727] Chunk #1 of 1 ... [13:13:36.728] - Finding globals in 'X' for chunk #1 ... [13:13:36.728] + additional globals found: [n=0] [13:13:36.728] + additional namespaces needed: [n=0] [13:13:36.728] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.729] - seeds: [13:13:36.729] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.749] Created future: [13:13:36.749] MultisessionFuture: [13:13:36.749] Label: 'future_lapply-1' [13:13:36.749] Expression: [13:13:36.749] { [13:13:36.749] do.call(function(...) { [13:13:36.749] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.749] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.749] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.749] on.exit(options(oopts), add = TRUE) [13:13:36.749] } [13:13:36.749] { [13:13:36.749] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.749] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.749] ...future.FUN(...future.X_jj, ...) [13:13:36.749] }) [13:13:36.749] } [13:13:36.749] }, args = future.call.arguments) [13:13:36.749] } [13:13:36.749] Lazy evaluation: FALSE [13:13:36.749] Asynchronous evaluation: TRUE [13:13:36.749] Local evaluation: TRUE [13:13:36.749] Environment: R_GlobalEnv [13:13:36.749] Capture standard output: TRUE [13:13:36.749] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.749] Globals: 5 objects totaling 395.73 KiB (function '...future.FUN' of 1.41 KiB, DotDotDotList 'future.call.arguments' of 394.27 KiB, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.749] Packages: [13:13:36.749] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.749] Resolved: TRUE [13:13:36.749] Value: [13:13:36.749] Conditions captured: [13:13:36.749] Early signaling: FALSE [13:13:36.749] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.749] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.768] Chunk #1 of 1 ... DONE [13:13:36.768] Launching 1 futures (chunks) ... DONE [13:13:36.768] Resolving 1 futures (chunks) ... [13:13:36.769] - Number of value chunks collected: 1 [13:13:36.769] Resolving 1 futures (chunks) ... DONE [13:13:36.769] Reducing values from 1 chunks ... [13:13:36.769] - Number of values collected after concatenation: 1 [13:13:36.769] - Number of values expected: 1 [13:13:36.770] Reducing values from 1 chunks ... DONE [13:13:36.770] future_lapply() ... DONE - future_lapply(X, ...) - 'X' containing globals ... List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 [13:13:36.773] future_lapply() ... [13:13:36.777] Number of chunks: 2 [13:13:36.777] getGlobalsAndPackagesXApply() ... [13:13:36.777] - future.globals: TRUE [13:13:36.780] - globals found/used: [n=1] 'FUN' [13:13:36.780] - needed namespaces: [n=0] [13:13:36.780] Finding globals ... DONE [13:13:36.780] - use_args: TRUE [13:13:36.781] - Getting '...' globals ... [13:13:36.781] - '...' content: [n=0] [13:13:36.781] List of 1 [13:13:36.781] $ ...: list() [13:13:36.781] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.781] - attr(*, "where")=List of 1 [13:13:36.781] ..$ ...: [13:13:36.781] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.781] - attr(*, "resolved")= logi TRUE [13:13:36.781] - attr(*, "total_size")= num NA [13:13:36.785] - Getting '...' globals ... DONE [13:13:36.786] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:36.786] List of 2 [13:13:36.786] $ ...future.FUN:function (f) [13:13:36.786] $ ... : list() [13:13:36.786] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.786] - attr(*, "where")=List of 2 [13:13:36.786] ..$ ...future.FUN: [13:13:36.786] ..$ ... : [13:13:36.786] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.786] - attr(*, "resolved")= logi FALSE [13:13:36.786] - attr(*, "total_size")= num 1008 [13:13:36.790] Packages to be attached in all futures: [n=0] [13:13:36.791] getGlobalsAndPackagesXApply() ... DONE [13:13:36.791] Number of futures (= number of chunks): 2 [13:13:36.791] Launching 2 futures (chunks) ... [13:13:36.791] Chunk #1 of 2 ... [13:13:36.792] - Finding globals in 'X' for chunk #1 ... [13:13:36.794] + additional globals found: [n=2] 'a', 'b' [13:13:36.795] + additional namespaces needed: [n=0] [13:13:36.795] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.795] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:36.796] - seeds: [13:13:36.796] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [13:13:36.819] Created future: [13:13:36.819] MultisessionFuture: [13:13:36.819] Label: 'future_lapply-1' [13:13:36.819] Expression: [13:13:36.819] { [13:13:36.819] do.call(function(...) { [13:13:36.819] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.819] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.819] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.819] on.exit(options(oopts), add = TRUE) [13:13:36.819] } [13:13:36.819] { [13:13:36.819] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.819] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.819] ...future.FUN(...future.X_jj, ...) [13:13:36.819] }) [13:13:36.819] } [13:13:36.819] }, args = future.call.arguments) [13:13:36.819] } [13:13:36.819] Lazy evaluation: FALSE [13:13:36.819] Asynchronous evaluation: TRUE [13:13:36.819] Local evaluation: TRUE [13:13:36.819] Environment: R_GlobalEnv [13:13:36.819] Capture standard output: TRUE [13:13:36.819] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.819] Globals: 7 objects totaling 3.48 KiB (function '...future.FUN' of 0.98 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 2.38 KiB, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes, ...) [13:13:36.819] Packages: [13:13:36.819] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.819] Resolved: TRUE [13:13:36.819] Value: [13:13:36.819] Conditions captured: [13:13:36.819] Early signaling: FALSE [13:13:36.819] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.819] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.836] Chunk #1 of 2 ... DONE [13:13:36.837] Chunk #2 of 2 ... [13:13:36.837] - Finding globals in 'X' for chunk #2 ... [13:13:36.839] + additional globals found: [n=2] 'a', 'b' [13:13:36.840] + additional namespaces needed: [n=1] 'tools' [13:13:36.840] - Finding globals in 'X' for chunk #2 ... DONE [13:13:36.840] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:36.841] - seeds: [13:13:36.841] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [13:13:36.860] Created future: [13:13:36.860] MultisessionFuture: [13:13:36.860] Label: 'future_lapply-2' [13:13:36.860] Expression: [13:13:36.860] { [13:13:36.860] do.call(function(...) { [13:13:36.860] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.860] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.860] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.860] on.exit(options(oopts), add = TRUE) [13:13:36.860] } [13:13:36.860] { [13:13:36.860] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.860] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.860] ...future.FUN(...future.X_jj, ...) [13:13:36.860] }) [13:13:36.860] } [13:13:36.860] }, args = future.call.arguments) [13:13:36.860] } [13:13:36.860] Lazy evaluation: FALSE [13:13:36.860] Asynchronous evaluation: TRUE [13:13:36.860] Local evaluation: TRUE [13:13:36.860] Environment: R_GlobalEnv [13:13:36.860] Capture standard output: TRUE [13:13:36.860] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.860] Globals: 7 objects totaling 5.11 KiB (function '...future.FUN' of 0.98 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 4.02 KiB, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes, ...) [13:13:36.860] Packages: 1 packages ('tools') [13:13:36.860] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.860] Resolved: TRUE [13:13:36.860] Value: [13:13:36.860] Conditions captured: [13:13:36.860] Early signaling: FALSE [13:13:36.860] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.860] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.881] Chunk #2 of 2 ... DONE [13:13:36.881] Launching 2 futures (chunks) ... DONE [13:13:36.881] Resolving 2 futures (chunks) ... [13:13:36.882] - Number of value chunks collected: 2 [13:13:36.882] Resolving 2 futures (chunks) ... DONE [13:13:36.883] Reducing values from 2 chunks ... [13:13:36.883] - Number of values collected after concatenation: 4 [13:13:36.883] - Number of values expected: 4 [13:13:36.883] Reducing values from 2 chunks ... DONE [13:13:36.883] future_lapply() ... DONE List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 - future_lapply(x, ...) - passing '...' as a global ... List of 1 $ z0:List of 1 ..$ :List of 1 .. ..$ a: num 1 [13:13:36.888] future_lapply() ... [13:13:36.892] Number of chunks: 1 [13:13:36.892] getGlobalsAndPackagesXApply() ... [13:13:36.892] - future.globals: TRUE [13:13:36.896] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [13:13:36.896] - needed namespaces: [n=0] [13:13:36.896] Finding globals ... DONE [13:13:36.896] - use_args: TRUE [13:13:36.897] - Getting '...' globals ... [13:13:36.897] - '...' content: [n=0] [13:13:36.897] List of 1 [13:13:36.897] $ ...: list() [13:13:36.897] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.897] - attr(*, "where")=List of 1 [13:13:36.897] ..$ ...: [13:13:36.897] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.897] - attr(*, "resolved")= logi TRUE [13:13:36.897] - attr(*, "total_size")= num NA [13:13:36.902] - Getting '...' globals ... DONE [13:13:36.902] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [13:13:36.903] List of 3 [13:13:36.903] $ ...future.FUN :function (x) [13:13:36.903] $ future.call.arguments:List of 1 [13:13:36.903] ..$ a: num 1 [13:13:36.903] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.903] $ ... : list() [13:13:36.903] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.903] - attr(*, "where")=List of 3 [13:13:36.903] ..$ ...future.FUN : [13:13:36.903] ..$ future.call.arguments: [13:13:36.903] ..$ ... : [13:13:36.903] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.903] - attr(*, "resolved")= logi FALSE [13:13:36.903] - attr(*, "total_size")= num 1272 [13:13:36.909] Packages to be attached in all futures: [n=0] [13:13:36.909] getGlobalsAndPackagesXApply() ... DONE [13:13:36.909] Number of futures (= number of chunks): 1 [13:13:36.910] Launching 1 futures (chunks) ... [13:13:36.910] Chunk #1 of 1 ... [13:13:36.910] - Finding globals in 'X' for chunk #1 ... [13:13:36.911] + additional globals found: [n=0] [13:13:36.911] + additional namespaces needed: [n=0] [13:13:36.911] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.911] - seeds: [13:13:36.911] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.930] Created future: [13:13:36.930] MultisessionFuture: [13:13:36.930] Label: 'future_lapply-1' [13:13:36.930] Expression: [13:13:36.930] { [13:13:36.930] do.call(function(...) { [13:13:36.930] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.930] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.930] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.930] on.exit(options(oopts), add = TRUE) [13:13:36.930] } [13:13:36.930] { [13:13:36.930] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.930] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.930] ...future.FUN(...future.X_jj) [13:13:36.930] }) [13:13:36.930] } [13:13:36.930] }, args = future.call.arguments) [13:13:36.930] } [13:13:36.930] Lazy evaluation: FALSE [13:13:36.930] Asynchronous evaluation: TRUE [13:13:36.930] Local evaluation: TRUE [13:13:36.930] Environment: 0x000001ff47565298 [13:13:36.930] Capture standard output: TRUE [13:13:36.930] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.930] Globals: 5 objects totaling 1.30 KiB (function '...future.FUN' of 1.19 KiB, DotDotDotList 'future.call.arguments' of 56 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:36.930] Packages: [13:13:36.930] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.930] Resolved: TRUE [13:13:36.930] Value: [13:13:36.930] Conditions captured: [13:13:36.930] Early signaling: FALSE [13:13:36.930] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.930] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:36.948] Chunk #1 of 1 ... DONE [13:13:36.948] Launching 1 futures (chunks) ... DONE [13:13:36.948] Resolving 1 futures (chunks) ... [13:13:36.949] - Number of value chunks collected: 1 [13:13:36.949] Resolving 1 futures (chunks) ... DONE [13:13:36.949] Reducing values from 1 chunks ... [13:13:36.949] - Number of values collected after concatenation: 1 [13:13:36.949] - Number of values expected: 1 [13:13:36.949] Reducing values from 1 chunks ... DONE [13:13:36.950] future_lapply() ... DONE List of 1 $ z1:List of 1 ..$ :List of 1 .. ..$ a: num 1 - future_lapply(X, ...) - '{ a <- a + 1; a }' ... [13:13:36.951] future_lapply() ... [13:13:36.955] Number of chunks: 1 [13:13:36.955] getGlobalsAndPackagesXApply() ... [13:13:36.956] - future.globals: TRUE [13:13:36.959] - globals found/used: [n=2] 'FUN', 'a' [13:13:36.959] - needed namespaces: [n=0] [13:13:36.960] Finding globals ... DONE [13:13:36.960] - use_args: TRUE [13:13:36.960] - Getting '...' globals ... [13:13:36.961] - '...' content: [n=0] [13:13:36.961] List of 1 [13:13:36.961] $ ...: list() [13:13:36.961] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.961] - attr(*, "where")=List of 1 [13:13:36.961] ..$ ...: [13:13:36.961] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.961] - attr(*, "resolved")= logi TRUE [13:13:36.961] - attr(*, "total_size")= num NA [13:13:36.965] - Getting '...' globals ... DONE [13:13:36.965] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [13:13:36.965] List of 3 [13:13:36.965] $ ...future.FUN:function (ii) [13:13:36.965] $ a : num 1 [13:13:36.965] $ ... : list() [13:13:36.965] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:36.965] - attr(*, "where")=List of 3 [13:13:36.965] ..$ ...future.FUN: [13:13:36.965] ..$ a : [13:13:36.965] ..$ ... : [13:13:36.965] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:36.965] - attr(*, "resolved")= logi FALSE [13:13:36.965] - attr(*, "total_size")= num 2984 [13:13:36.970] Packages to be attached in all futures: [n=0] [13:13:36.970] getGlobalsAndPackagesXApply() ... DONE [13:13:36.974] Number of futures (= number of chunks): 1 [13:13:36.974] Launching 1 futures (chunks) ... [13:13:36.975] Chunk #1 of 1 ... [13:13:36.975] - Finding globals in 'X' for chunk #1 ... [13:13:36.976] + additional globals found: [n=0] [13:13:36.976] + additional namespaces needed: [n=0] [13:13:36.976] - Finding globals in 'X' for chunk #1 ... DONE [13:13:36.976] - seeds: [13:13:36.976] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:36.995] Created future: [13:13:36.995] MultisessionFuture: [13:13:36.995] Label: 'future_lapply-1' [13:13:36.995] Expression: [13:13:36.995] { [13:13:36.995] do.call(function(...) { [13:13:36.995] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:36.995] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:36.995] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:36.995] on.exit(options(oopts), add = TRUE) [13:13:36.995] } [13:13:36.995] { [13:13:36.995] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:36.995] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:36.995] ...future.FUN(...future.X_jj, ...) [13:13:36.995] }) [13:13:36.995] } [13:13:36.995] }, args = future.call.arguments) [13:13:36.995] } [13:13:36.995] Lazy evaluation: FALSE [13:13:36.995] Asynchronous evaluation: TRUE [13:13:36.995] Local evaluation: TRUE [13:13:36.995] Environment: R_GlobalEnv [13:13:36.995] Capture standard output: TRUE [13:13:36.995] Capture condition classes: 'condition' (excluding 'nothing') [13:13:36.995] Globals: 6 objects totaling 2.97 KiB (function '...future.FUN' of 2.86 KiB, numeric 'a' of 56 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:36.995] Packages: [13:13:36.995] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:36.995] Resolved: TRUE [13:13:36.995] Value: [13:13:36.995] Conditions captured: [13:13:36.995] Early signaling: FALSE [13:13:36.995] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:36.995] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.014] Chunk #1 of 1 ... DONE [13:13:37.014] Launching 1 futures (chunks) ... DONE [13:13:37.014] Resolving 1 futures (chunks) ... [13:13:37.015] - Number of value chunks collected: 1 [13:13:37.015] Resolving 1 futures (chunks) ... DONE [13:13:37.015] Reducing values from 1 chunks ... [13:13:37.015] - Number of values collected after concatenation: 1 [13:13:37.015] - Number of values expected: 1 [13:13:37.015] Reducing values from 1 chunks ... DONE [13:13:37.016] future_lapply() ... DONE - future_lapply(X, ...) - '{ a; a <- a + 1 }' ... [13:13:37.016] future_lapply() ... [13:13:37.019] Number of chunks: 1 [13:13:37.020] getGlobalsAndPackagesXApply() ... [13:13:37.020] - future.globals: TRUE [13:13:37.023] - globals found/used: [n=2] 'FUN', 'a' [13:13:37.023] - needed namespaces: [n=0] [13:13:37.023] Finding globals ... DONE [13:13:37.024] - use_args: TRUE [13:13:37.024] - Getting '...' globals ... [13:13:37.024] - '...' content: [n=0] [13:13:37.025] List of 1 [13:13:37.025] $ ...: list() [13:13:37.025] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.025] - attr(*, "where")=List of 1 [13:13:37.025] ..$ ...: [13:13:37.025] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.025] - attr(*, "resolved")= logi TRUE [13:13:37.025] - attr(*, "total_size")= num NA [13:13:37.029] - Getting '...' globals ... DONE [13:13:37.029] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [13:13:37.029] List of 3 [13:13:37.029] $ ...future.FUN:function (ii) [13:13:37.029] $ a : num 1 [13:13:37.029] $ ... : list() [13:13:37.029] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.029] - attr(*, "where")=List of 3 [13:13:37.029] ..$ ...future.FUN: [13:13:37.029] ..$ a : [13:13:37.029] ..$ ... : [13:13:37.029] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.029] - attr(*, "resolved")= logi FALSE [13:13:37.029] - attr(*, "total_size")= num 2984 [13:13:37.035] Packages to be attached in all futures: [n=0] [13:13:37.035] getGlobalsAndPackagesXApply() ... DONE [13:13:37.036] Number of futures (= number of chunks): 1 [13:13:37.036] Launching 1 futures (chunks) ... [13:13:37.036] Chunk #1 of 1 ... [13:13:37.036] - Finding globals in 'X' for chunk #1 ... [13:13:37.037] + additional globals found: [n=0] [13:13:37.037] + additional namespaces needed: [n=0] [13:13:37.037] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.037] - seeds: [13:13:37.038] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.058] Created future: [13:13:37.058] MultisessionFuture: [13:13:37.058] Label: 'future_lapply-1' [13:13:37.058] Expression: [13:13:37.058] { [13:13:37.058] do.call(function(...) { [13:13:37.058] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.058] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.058] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.058] on.exit(options(oopts), add = TRUE) [13:13:37.058] } [13:13:37.058] { [13:13:37.058] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.058] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.058] ...future.FUN(...future.X_jj, ...) [13:13:37.058] }) [13:13:37.058] } [13:13:37.058] }, args = future.call.arguments) [13:13:37.058] } [13:13:37.058] Lazy evaluation: FALSE [13:13:37.058] Asynchronous evaluation: TRUE [13:13:37.058] Local evaluation: TRUE [13:13:37.058] Environment: R_GlobalEnv [13:13:37.058] Capture standard output: TRUE [13:13:37.058] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.058] Globals: 6 objects totaling 2.97 KiB (function '...future.FUN' of 2.86 KiB, numeric 'a' of 56 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:37.058] Packages: [13:13:37.058] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.058] Resolved: TRUE [13:13:37.058] Value: [13:13:37.058] Conditions captured: [13:13:37.058] Early signaling: FALSE [13:13:37.058] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.058] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.075] Chunk #1 of 1 ... DONE [13:13:37.075] Launching 1 futures (chunks) ... DONE [13:13:37.075] Resolving 1 futures (chunks) ... [13:13:37.076] - Number of value chunks collected: 1 [13:13:37.076] Resolving 1 futures (chunks) ... DONE [13:13:37.076] Reducing values from 1 chunks ... [13:13:37.076] - Number of values collected after concatenation: 1 [13:13:37.077] - Number of values expected: 1 [13:13:37.077] Reducing values from 1 chunks ... DONE [13:13:37.077] future_lapply() ... DONE - future_lapply(..., future.globals = ) ... [13:13:37.077] future_lapply() ... [13:13:37.080] Number of chunks: 1 [13:13:37.080] getGlobalsAndPackagesXApply() ... [13:13:37.081] - future.globals: with names '42' [13:13:37.081] - use_args: TRUE [13:13:37.081] - Getting '...' globals ... [13:13:37.082] - '...' content: [n=0] [13:13:37.082] List of 1 [13:13:37.082] $ ...: list() [13:13:37.082] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.082] - attr(*, "where")=List of 1 [13:13:37.082] ..$ ...: [13:13:37.082] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.082] - attr(*, "resolved")= logi TRUE [13:13:37.082] - attr(*, "total_size")= num NA [13:13:37.086] - Getting '...' globals ... DONE [13:13:37.087] Globals to be used in all futures (chunks): [n=3] 'a', '...future.FUN', '...' [13:13:37.087] List of 3 [13:13:37.087] $ a : num 42 [13:13:37.087] $ ...future.FUN:function (x) [13:13:37.087] $ ... : list() [13:13:37.087] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.087] - attr(*, "where")=List of 3 [13:13:37.087] ..$ a : [13:13:37.087] ..$ ...future.FUN: [13:13:37.087] ..$ ... : [13:13:37.087] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.087] - attr(*, "resolved")= logi FALSE [13:13:37.087] - attr(*, "total_size")= num NA [13:13:37.092] Packages to be attached in all futures: [n=0] [13:13:37.092] getGlobalsAndPackagesXApply() ... DONE [13:13:37.093] Number of futures (= number of chunks): 1 [13:13:37.093] Launching 1 futures (chunks) ... [13:13:37.093] Chunk #1 of 1 ... [13:13:37.093] - seeds: [13:13:37.093] - All globals exported: [n=6] 'a', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.113] Created future: [13:13:37.113] MultisessionFuture: [13:13:37.113] Label: 'future_lapply-1' [13:13:37.113] Expression: [13:13:37.113] { [13:13:37.113] do.call(function(...) { [13:13:37.113] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.113] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.113] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.113] on.exit(options(oopts), add = TRUE) [13:13:37.113] } [13:13:37.113] { [13:13:37.113] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.113] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.113] ...future.FUN(...future.X_jj, ...) [13:13:37.113] }) [13:13:37.113] } [13:13:37.113] }, args = future.call.arguments) [13:13:37.113] } [13:13:37.113] Lazy evaluation: FALSE [13:13:37.113] Asynchronous evaluation: TRUE [13:13:37.113] Local evaluation: TRUE [13:13:37.113] Environment: R_GlobalEnv [13:13:37.113] Capture standard output: TRUE [13:13:37.113] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.113] Globals: 6 objects totaling 1.45 KiB (numeric 'a' of 56 bytes, function '...future.FUN' of 1.34 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, ...) [13:13:37.113] Packages: [13:13:37.113] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.113] Resolved: TRUE [13:13:37.113] Value: [13:13:37.113] Conditions captured: [13:13:37.113] Early signaling: FALSE [13:13:37.113] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.113] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.129] Chunk #1 of 1 ... DONE [13:13:37.129] Launching 1 futures (chunks) ... DONE [13:13:37.129] Resolving 1 futures (chunks) ... [13:13:37.130] - Number of value chunks collected: 1 [13:13:37.130] Resolving 1 futures (chunks) ... DONE [13:13:37.130] Reducing values from 1 chunks ... [13:13:37.130] - Number of values collected after concatenation: 1 [13:13:37.130] - Number of values expected: 1 [13:13:37.131] Reducing values from 1 chunks ... DONE [13:13:37.131] future_lapply() ... DONE List of 1 $ : num 42 > > message("*** future_lapply() - tricky globals ... DONE") *** future_lapply() - tricky globals ... DONE > > > message("*** future_lapply() - missing arguments ...") *** future_lapply() - missing arguments ... > > ## Here 'abc' becomes missing, i.e. missing(abc) is TRUE > foo <- function(x, abc) future_lapply(x, FUN = function(y) y) > y <- foo(1:2) [13:13:37.132] future_lapply() ... [13:13:37.139] Number of chunks: 2 [13:13:37.139] getGlobalsAndPackagesXApply() ... [13:13:37.139] - future.globals: TRUE [13:13:37.141] - globals found/used: [n=1] 'FUN' [13:13:37.141] - needed namespaces: [n=0] [13:13:37.142] Finding globals ... DONE [13:13:37.142] - use_args: TRUE [13:13:37.142] - Getting '...' globals ... [13:13:37.143] - '...' content: [n=0] [13:13:37.143] List of 1 [13:13:37.143] $ ...: list() [13:13:37.143] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.143] - attr(*, "where")=List of 1 [13:13:37.143] ..$ ...: [13:13:37.143] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.143] - attr(*, "resolved")= logi TRUE [13:13:37.143] - attr(*, "total_size")= num NA [13:13:37.147] - Getting '...' globals ... DONE [13:13:37.147] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:37.148] List of 2 [13:13:37.148] $ ...future.FUN:function (y) [13:13:37.148] $ ... : list() [13:13:37.148] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.148] - attr(*, "where")=List of 2 [13:13:37.148] ..$ ...future.FUN: [13:13:37.148] ..$ ... : [13:13:37.148] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.148] - attr(*, "resolved")= logi FALSE [13:13:37.148] - attr(*, "total_size")= num 280 [13:13:37.152] Packages to be attached in all futures: [n=0] [13:13:37.152] getGlobalsAndPackagesXApply() ... DONE [13:13:37.152] Number of futures (= number of chunks): 2 [13:13:37.153] Launching 2 futures (chunks) ... [13:13:37.153] Chunk #1 of 2 ... [13:13:37.153] - Finding globals in 'X' for chunk #1 ... [13:13:37.154] + additional globals found: [n=0] [13:13:37.154] + additional namespaces needed: [n=0] [13:13:37.154] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.154] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.155] - seeds: [13:13:37.155] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.173] Created future: [13:13:37.174] MultisessionFuture: [13:13:37.174] Label: 'future_lapply-1' [13:13:37.174] Expression: [13:13:37.174] { [13:13:37.174] do.call(function(...) { [13:13:37.174] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.174] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.174] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.174] on.exit(options(oopts), add = TRUE) [13:13:37.174] } [13:13:37.174] { [13:13:37.174] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.174] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.174] ...future.FUN(...future.X_jj, ...) [13:13:37.174] }) [13:13:37.174] } [13:13:37.174] }, args = future.call.arguments) [13:13:37.174] } [13:13:37.174] Lazy evaluation: FALSE [13:13:37.174] Asynchronous evaluation: TRUE [13:13:37.174] Local evaluation: TRUE [13:13:37.174] Environment: 0x000001ff4aa77b20 [13:13:37.174] Capture standard output: TRUE [13:13:37.174] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.174] Globals: 5 objects totaling 336 bytes (function '...future.FUN' of 280 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.174] Packages: [13:13:37.174] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.174] Resolved: TRUE [13:13:37.174] Value: [13:13:37.174] Conditions captured: [13:13:37.174] Early signaling: FALSE [13:13:37.174] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.174] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.191] Chunk #1 of 2 ... DONE [13:13:37.191] Chunk #2 of 2 ... [13:13:37.192] - Finding globals in 'X' for chunk #2 ... [13:13:37.192] + additional globals found: [n=0] [13:13:37.192] + additional namespaces needed: [n=0] [13:13:37.193] - Finding globals in 'X' for chunk #2 ... DONE [13:13:37.193] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.193] - seeds: [13:13:37.193] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.213] Created future: [13:13:37.213] MultisessionFuture: [13:13:37.213] Label: 'future_lapply-2' [13:13:37.213] Expression: [13:13:37.213] { [13:13:37.213] do.call(function(...) { [13:13:37.213] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.213] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.213] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.213] on.exit(options(oopts), add = TRUE) [13:13:37.213] } [13:13:37.213] { [13:13:37.213] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.213] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.213] ...future.FUN(...future.X_jj, ...) [13:13:37.213] }) [13:13:37.213] } [13:13:37.213] }, args = future.call.arguments) [13:13:37.213] } [13:13:37.213] Lazy evaluation: FALSE [13:13:37.213] Asynchronous evaluation: TRUE [13:13:37.213] Local evaluation: TRUE [13:13:37.213] Environment: 0x000001ff4aa77b20 [13:13:37.213] Capture standard output: TRUE [13:13:37.213] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.213] Globals: 5 objects totaling 336 bytes (function '...future.FUN' of 280 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.213] Packages: [13:13:37.213] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.213] Resolved: TRUE [13:13:37.213] Value: [13:13:37.213] Conditions captured: [13:13:37.213] Early signaling: FALSE [13:13:37.213] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.213] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.231] Chunk #2 of 2 ... DONE [13:13:37.231] Launching 2 futures (chunks) ... DONE [13:13:37.231] Resolving 2 futures (chunks) ... [13:13:37.232] - Number of value chunks collected: 2 [13:13:37.232] Resolving 2 futures (chunks) ... DONE [13:13:37.232] Reducing values from 2 chunks ... [13:13:37.233] - Number of values collected after concatenation: 2 [13:13:37.233] - Number of values expected: 2 [13:13:37.233] Reducing values from 2 chunks ... DONE [13:13:37.233] future_lapply() ... DONE > stopifnot(identical(y, as.list(1:2))) > > message("*** future_lapply() - missing arguments ... DONE") *** future_lapply() - missing arguments ... DONE > > > message("*** future_lapply() - false positives ...") *** future_lapply() - false positives ... > > ## Here 'abc' becomes a promise, which fails to resolve > ## iff 'xyz' does not exist. (Issue #161) > suppressWarnings(rm(list = "xyz")) > foo <- function(x, abc) future_lapply(x, FUN = function(y) y) > y <- foo(1:2, abc = (xyz >= 3.14)) [13:13:37.234] future_lapply() ... [13:13:37.237] Number of chunks: 2 [13:13:37.238] getGlobalsAndPackagesXApply() ... [13:13:37.238] - future.globals: TRUE [13:13:37.240] - globals found/used: [n=1] 'FUN' [13:13:37.240] - needed namespaces: [n=0] [13:13:37.240] Finding globals ... DONE [13:13:37.241] - use_args: TRUE [13:13:37.241] - Getting '...' globals ... [13:13:37.241] - '...' content: [n=0] [13:13:37.242] List of 1 [13:13:37.242] $ ...: list() [13:13:37.242] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.242] - attr(*, "where")=List of 1 [13:13:37.242] ..$ ...: [13:13:37.242] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.242] - attr(*, "resolved")= logi TRUE [13:13:37.242] - attr(*, "total_size")= num NA [13:13:37.246] - Getting '...' globals ... DONE [13:13:37.246] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:37.246] List of 2 [13:13:37.246] $ ...future.FUN:function (y) [13:13:37.246] $ ... : list() [13:13:37.246] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.246] - attr(*, "where")=List of 2 [13:13:37.246] ..$ ...future.FUN: [13:13:37.246] ..$ ... : [13:13:37.246] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.246] - attr(*, "resolved")= logi FALSE [13:13:37.246] - attr(*, "total_size")= num 280 [13:13:37.250] Packages to be attached in all futures: [n=0] [13:13:37.251] getGlobalsAndPackagesXApply() ... DONE [13:13:37.251] Number of futures (= number of chunks): 2 [13:13:37.251] Launching 2 futures (chunks) ... [13:13:37.251] Chunk #1 of 2 ... [13:13:37.252] - Finding globals in 'X' for chunk #1 ... [13:13:37.252] + additional globals found: [n=0] [13:13:37.252] + additional namespaces needed: [n=0] [13:13:37.253] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.253] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.253] - seeds: [13:13:37.253] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.271] Created future: [13:13:37.272] MultisessionFuture: [13:13:37.272] Label: 'future_lapply-1' [13:13:37.272] Expression: [13:13:37.272] { [13:13:37.272] do.call(function(...) { [13:13:37.272] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.272] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.272] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.272] on.exit(options(oopts), add = TRUE) [13:13:37.272] } [13:13:37.272] { [13:13:37.272] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.272] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.272] ...future.FUN(...future.X_jj, ...) [13:13:37.272] }) [13:13:37.272] } [13:13:37.272] }, args = future.call.arguments) [13:13:37.272] } [13:13:37.272] Lazy evaluation: FALSE [13:13:37.272] Asynchronous evaluation: TRUE [13:13:37.272] Local evaluation: TRUE [13:13:37.272] Environment: 0x000001ff43b0e260 [13:13:37.272] Capture standard output: TRUE [13:13:37.272] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.272] Globals: 5 objects totaling 336 bytes (function '...future.FUN' of 280 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.272] Packages: [13:13:37.272] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.272] Resolved: TRUE [13:13:37.272] Value: [13:13:37.272] Conditions captured: [13:13:37.272] Early signaling: FALSE [13:13:37.272] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.272] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.289] Chunk #1 of 2 ... DONE [13:13:37.289] Chunk #2 of 2 ... [13:13:37.289] - Finding globals in 'X' for chunk #2 ... [13:13:37.290] + additional globals found: [n=0] [13:13:37.290] + additional namespaces needed: [n=0] [13:13:37.290] - Finding globals in 'X' for chunk #2 ... DONE [13:13:37.290] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.290] - seeds: [13:13:37.290] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.308] Created future: [13:13:37.308] MultisessionFuture: [13:13:37.308] Label: 'future_lapply-2' [13:13:37.308] Expression: [13:13:37.308] { [13:13:37.308] do.call(function(...) { [13:13:37.308] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.308] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.308] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.308] on.exit(options(oopts), add = TRUE) [13:13:37.308] } [13:13:37.308] { [13:13:37.308] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.308] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.308] ...future.FUN(...future.X_jj, ...) [13:13:37.308] }) [13:13:37.308] } [13:13:37.308] }, args = future.call.arguments) [13:13:37.308] } [13:13:37.308] Lazy evaluation: FALSE [13:13:37.308] Asynchronous evaluation: TRUE [13:13:37.308] Local evaluation: TRUE [13:13:37.308] Environment: 0x000001ff43b0e260 [13:13:37.308] Capture standard output: TRUE [13:13:37.308] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.308] Globals: 5 objects totaling 336 bytes (function '...future.FUN' of 280 bytes, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 56 bytes, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.308] Packages: [13:13:37.308] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.308] Resolved: TRUE [13:13:37.308] Value: [13:13:37.308] Conditions captured: [13:13:37.308] Early signaling: FALSE [13:13:37.308] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.308] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.332] Chunk #2 of 2 ... DONE [13:13:37.332] Launching 2 futures (chunks) ... DONE [13:13:37.332] Resolving 2 futures (chunks) ... [13:13:37.334] - Number of value chunks collected: 2 [13:13:37.334] Resolving 2 futures (chunks) ... DONE [13:13:37.334] Reducing values from 2 chunks ... [13:13:37.334] - Number of values collected after concatenation: 2 [13:13:37.335] - Number of values expected: 2 [13:13:37.335] Reducing values from 2 chunks ... DONE [13:13:37.335] future_lapply() ... DONE > stopifnot(identical(y, as.list(1:2))) > > message("*** future_lapply() - false positives ... DONE") *** future_lapply() - false positives ... DONE > > > message("*** future_lapply() - too large ...") *** future_lapply() - too large ... > > oMaxSize <- getOption("future.globals.maxSize") > X <- replicate(10L, 1:100, simplify = FALSE) > FUN <- function(x) { + getOption("future.globals.maxSize") + } > > y0 <- lapply(X, FUN = FUN) > stopifnot(all(sapply(y0, FUN = identical, oMaxSize))) > > sizes <- unclass(c(FUN = object.size(FUN), X = object.size(X))) > cat(sprintf("Baseline size of globals: %.2f KiB\n", sizes[["FUN"]] / 1024)) Baseline size of globals: 1.80 KiB > > message("- true positive ...") - true positive ... > options(future.globals.maxSize = 1L) > res <- tryCatch({ + y <- future_lapply(X, FUN = FUN) + }, error = identity) [13:13:37.339] future_lapply() ... [13:13:37.342] Number of chunks: 2 [13:13:37.343] getGlobalsAndPackagesXApply() ... [13:13:37.343] - future.globals: TRUE [13:13:37.345] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > res <- NULL > options(future.globals.maxSize = oMaxSize) > > maxSize <- getOption("future.globals.maxSize") > y <- future_lapply(X, FUN = FUN) [13:13:37.346] future_lapply() ... [13:13:37.349] Number of chunks: 2 [13:13:37.349] getGlobalsAndPackagesXApply() ... [13:13:37.350] - future.globals: TRUE [13:13:37.352] - globals found/used: [n=1] 'FUN' [13:13:37.353] - needed namespaces: [n=0] [13:13:37.353] Finding globals ... DONE [13:13:37.353] - use_args: TRUE [13:13:37.353] - Getting '...' globals ... [13:13:37.354] - '...' content: [n=0] [13:13:37.354] List of 1 [13:13:37.354] $ ...: list() [13:13:37.354] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.354] - attr(*, "where")=List of 1 [13:13:37.354] ..$ ...: [13:13:37.354] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.354] - attr(*, "resolved")= logi TRUE [13:13:37.354] - attr(*, "total_size")= num NA [13:13:37.358] - Getting '...' globals ... DONE [13:13:37.358] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:37.358] List of 2 [13:13:37.358] $ ...future.FUN:function (x) [13:13:37.358] $ ... : list() [13:13:37.358] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.358] - attr(*, "where")=List of 2 [13:13:37.358] ..$ ...future.FUN: [13:13:37.358] ..$ ... : [13:13:37.358] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.358] - attr(*, "resolved")= logi FALSE [13:13:37.358] - attr(*, "total_size")= num 1840 [13:13:37.363] Packages to be attached in all futures: [n=0] [13:13:37.363] getGlobalsAndPackagesXApply() ... DONE [13:13:37.363] Number of futures (= number of chunks): 2 [13:13:37.364] Launching 2 futures (chunks) ... [13:13:37.364] Chunk #1 of 2 ... [13:13:37.364] - Finding globals in 'X' for chunk #1 ... [13:13:37.365] + additional globals found: [n=0] [13:13:37.365] + additional namespaces needed: [n=0] [13:13:37.365] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.365] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.365] - seeds: [13:13:37.366] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.385] Created future: [13:13:37.385] MultisessionFuture: [13:13:37.385] Label: 'future_lapply-1' [13:13:37.385] Expression: [13:13:37.385] { [13:13:37.385] do.call(function(...) { [13:13:37.385] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.385] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.385] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.385] on.exit(options(oopts), add = TRUE) [13:13:37.385] } [13:13:37.385] { [13:13:37.385] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.385] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.385] ...future.FUN(...future.X_jj, ...) [13:13:37.385] }) [13:13:37.385] } [13:13:37.385] }, args = future.call.arguments) [13:13:37.385] } [13:13:37.385] Lazy evaluation: FALSE [13:13:37.385] Asynchronous evaluation: TRUE [13:13:37.385] Local evaluation: TRUE [13:13:37.385] Environment: R_GlobalEnv [13:13:37.385] Capture standard output: TRUE [13:13:37.385] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.385] Globals: 5 objects totaling 3.98 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 2.19 KiB, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.385] Packages: [13:13:37.385] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.385] Resolved: TRUE [13:13:37.385] Value: [13:13:37.385] Conditions captured: [13:13:37.385] Early signaling: FALSE [13:13:37.385] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.385] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.401] Chunk #1 of 2 ... DONE [13:13:37.401] Chunk #2 of 2 ... [13:13:37.402] - Finding globals in 'X' for chunk #2 ... [13:13:37.402] + additional globals found: [n=0] [13:13:37.402] + additional namespaces needed: [n=0] [13:13:37.402] - Finding globals in 'X' for chunk #2 ... DONE [13:13:37.402] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [13:13:37.403] - seeds: [13:13:37.403] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.421] Created future: [13:13:37.421] MultisessionFuture: [13:13:37.421] Label: 'future_lapply-2' [13:13:37.421] Expression: [13:13:37.421] { [13:13:37.421] do.call(function(...) { [13:13:37.421] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.421] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.421] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.421] on.exit(options(oopts), add = TRUE) [13:13:37.421] } [13:13:37.421] { [13:13:37.421] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.421] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.421] ...future.FUN(...future.X_jj, ...) [13:13:37.421] }) [13:13:37.421] } [13:13:37.421] }, args = future.call.arguments) [13:13:37.421] } [13:13:37.421] Lazy evaluation: FALSE [13:13:37.421] Asynchronous evaluation: TRUE [13:13:37.421] Local evaluation: TRUE [13:13:37.421] Environment: R_GlobalEnv [13:13:37.421] Capture standard output: TRUE [13:13:37.421] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.421] Globals: 5 objects totaling 3.98 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 2.19 KiB, NULL '...future.seeds_ii' of 0 bytes, NULL '...future.globals.maxSize' of 0 bytes) [13:13:37.421] Packages: [13:13:37.421] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.421] Resolved: TRUE [13:13:37.421] Value: [13:13:37.421] Conditions captured: [13:13:37.421] Early signaling: FALSE [13:13:37.421] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.421] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.439] Chunk #2 of 2 ... DONE [13:13:37.439] Launching 2 futures (chunks) ... DONE [13:13:37.439] Resolving 2 futures (chunks) ... [13:13:37.440] - Number of value chunks collected: 2 [13:13:37.441] Resolving 2 futures (chunks) ... DONE [13:13:37.441] Reducing values from 2 chunks ... [13:13:37.441] - Number of values collected after concatenation: 10 [13:13:37.441] - Number of values expected: 10 [13:13:37.441] Reducing values from 2 chunks ... DONE [13:13:37.441] future_lapply() ... DONE > str(y) List of 10 $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL $ : NULL > stopifnot(all(sapply(y, FUN = identical, oMaxSize))) > > message("- approximately invariant to chunk size ...") - approximately invariant to chunk size ... > maxSize <- sizes[["FUN"]] + sizes[["X"]] / length(X) > options(future.globals.maxSize = maxSize) > > for (chunk.size in c(1L, 2L, 5L, 10L)) { + y <- future_lapply(X, FUN = FUN, future.chunk.size = chunk.size) + str(y) + stopifnot(all(unlist(y) == maxSize)) + cat(sprintf("maxSize = %g bytes\nfuture.globals.maxSize = %g bytes\n", + maxSize, getOption("future.globals.maxSize"))) + stopifnot(getOption("future.globals.maxSize") == maxSize) + } [13:13:37.452] future_lapply() ... [13:13:37.456] Number of chunks: 10 [13:13:37.456] getGlobalsAndPackagesXApply() ... [13:13:37.456] - future.globals: TRUE [13:13:37.459] - globals found/used: [n=1] 'FUN' [13:13:37.459] - needed namespaces: [n=0] [13:13:37.459] Finding globals ... DONE [13:13:37.459] - use_args: TRUE [13:13:37.460] - Getting '...' globals ... [13:13:37.460] - '...' content: [n=0] [13:13:37.460] List of 1 [13:13:37.460] $ ...: list() [13:13:37.460] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.460] - attr(*, "where")=List of 1 [13:13:37.460] ..$ ...: [13:13:37.460] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.460] - attr(*, "resolved")= logi TRUE [13:13:37.460] - attr(*, "total_size")= num NA [13:13:37.467] - Getting '...' globals ... DONE [13:13:37.468] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:37.468] List of 2 [13:13:37.468] $ ...future.FUN:function (x) [13:13:37.468] $ ... : list() [13:13:37.468] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.468] - attr(*, "where")=List of 2 [13:13:37.468] ..$ ...future.FUN: [13:13:37.468] ..$ ... : [13:13:37.468] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.468] - attr(*, "resolved")= logi FALSE [13:13:37.468] - attr(*, "total_size")= num 1840 [13:13:37.473] Packages to be attached in all futures: [n=0] [13:13:37.473] getGlobalsAndPackagesXApply() ... DONE [13:13:37.473] Number of futures (= number of chunks): 10 [13:13:37.474] Launching 10 futures (chunks) ... [13:13:37.474] Chunk #1 of 10 ... [13:13:37.474] - Finding globals in 'X' for chunk #1 ... [13:13:37.474] + additional globals found: [n=0] [13:13:37.475] + additional namespaces needed: [n=0] [13:13:37.475] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.475] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.476] - seeds: [13:13:37.476] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.494] Created future: [13:13:37.494] MultisessionFuture: [13:13:37.494] Label: 'future_lapply-1' [13:13:37.494] Expression: [13:13:37.494] { [13:13:37.494] do.call(function(...) { [13:13:37.494] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.494] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.494] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.494] on.exit(options(oopts), add = TRUE) [13:13:37.494] } [13:13:37.494] { [13:13:37.494] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.494] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.494] ...future.FUN(...future.X_jj, ...) [13:13:37.494] }) [13:13:37.494] } [13:13:37.494] }, args = future.call.arguments) [13:13:37.494] } [13:13:37.494] Lazy evaluation: FALSE [13:13:37.494] Asynchronous evaluation: TRUE [13:13:37.494] Local evaluation: TRUE [13:13:37.494] Environment: R_GlobalEnv [13:13:37.494] Capture standard output: TRUE [13:13:37.494] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.494] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.494] Packages: [13:13:37.494] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.494] Resolved: TRUE [13:13:37.494] Value: [13:13:37.494] Conditions captured: [13:13:37.494] Early signaling: FALSE [13:13:37.494] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.494] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.512] Chunk #1 of 10 ... DONE [13:13:37.512] Chunk #2 of 10 ... [13:13:37.512] - Finding globals in 'X' for chunk #2 ... [13:13:37.512] + additional globals found: [n=0] [13:13:37.513] + additional namespaces needed: [n=0] [13:13:37.513] - Finding globals in 'X' for chunk #2 ... DONE [13:13:37.513] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.513] - seeds: [13:13:37.513] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.532] Created future: [13:13:37.532] MultisessionFuture: [13:13:37.532] Label: 'future_lapply-2' [13:13:37.532] Expression: [13:13:37.532] { [13:13:37.532] do.call(function(...) { [13:13:37.532] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.532] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.532] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.532] on.exit(options(oopts), add = TRUE) [13:13:37.532] } [13:13:37.532] { [13:13:37.532] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.532] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.532] ...future.FUN(...future.X_jj, ...) [13:13:37.532] }) [13:13:37.532] } [13:13:37.532] }, args = future.call.arguments) [13:13:37.532] } [13:13:37.532] Lazy evaluation: FALSE [13:13:37.532] Asynchronous evaluation: TRUE [13:13:37.532] Local evaluation: TRUE [13:13:37.532] Environment: R_GlobalEnv [13:13:37.532] Capture standard output: TRUE [13:13:37.532] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.532] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.532] Packages: [13:13:37.532] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.532] Resolved: TRUE [13:13:37.532] Value: [13:13:37.532] Conditions captured: [13:13:37.532] Early signaling: FALSE [13:13:37.532] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.532] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.549] Chunk #2 of 10 ... DONE [13:13:37.549] Chunk #3 of 10 ... [13:13:37.549] - Finding globals in 'X' for chunk #3 ... [13:13:37.550] + additional globals found: [n=0] [13:13:37.550] + additional namespaces needed: [n=0] [13:13:37.550] - Finding globals in 'X' for chunk #3 ... DONE [13:13:37.550] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.551] - seeds: [13:13:37.551] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.569] Created future: [13:13:37.570] MultisessionFuture: [13:13:37.570] Label: 'future_lapply-3' [13:13:37.570] Expression: [13:13:37.570] { [13:13:37.570] do.call(function(...) { [13:13:37.570] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.570] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.570] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.570] on.exit(options(oopts), add = TRUE) [13:13:37.570] } [13:13:37.570] { [13:13:37.570] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.570] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.570] ...future.FUN(...future.X_jj, ...) [13:13:37.570] }) [13:13:37.570] } [13:13:37.570] }, args = future.call.arguments) [13:13:37.570] } [13:13:37.570] Lazy evaluation: FALSE [13:13:37.570] Asynchronous evaluation: TRUE [13:13:37.570] Local evaluation: TRUE [13:13:37.570] Environment: R_GlobalEnv [13:13:37.570] Capture standard output: TRUE [13:13:37.570] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.570] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.570] Packages: [13:13:37.570] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.570] Resolved: TRUE [13:13:37.570] Value: [13:13:37.570] Conditions captured: [13:13:37.570] Early signaling: FALSE [13:13:37.570] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.570] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.587] Chunk #3 of 10 ... DONE [13:13:37.587] Chunk #4 of 10 ... [13:13:37.587] - Finding globals in 'X' for chunk #4 ... [13:13:37.588] + additional globals found: [n=0] [13:13:37.588] + additional namespaces needed: [n=0] [13:13:37.588] - Finding globals in 'X' for chunk #4 ... DONE [13:13:37.588] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.588] - seeds: [13:13:37.589] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.607] Created future: [13:13:37.607] MultisessionFuture: [13:13:37.607] Label: 'future_lapply-4' [13:13:37.607] Expression: [13:13:37.607] { [13:13:37.607] do.call(function(...) { [13:13:37.607] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.607] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.607] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.607] on.exit(options(oopts), add = TRUE) [13:13:37.607] } [13:13:37.607] { [13:13:37.607] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.607] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.607] ...future.FUN(...future.X_jj, ...) [13:13:37.607] }) [13:13:37.607] } [13:13:37.607] }, args = future.call.arguments) [13:13:37.607] } [13:13:37.607] Lazy evaluation: FALSE [13:13:37.607] Asynchronous evaluation: TRUE [13:13:37.607] Local evaluation: TRUE [13:13:37.607] Environment: R_GlobalEnv [13:13:37.607] Capture standard output: TRUE [13:13:37.607] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.607] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.607] Packages: [13:13:37.607] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.607] Resolved: TRUE [13:13:37.607] Value: [13:13:37.607] Conditions captured: [13:13:37.607] Early signaling: FALSE [13:13:37.607] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.607] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.624] Chunk #4 of 10 ... DONE [13:13:37.624] Chunk #5 of 10 ... [13:13:37.625] - Finding globals in 'X' for chunk #5 ... [13:13:37.625] + additional globals found: [n=0] [13:13:37.625] + additional namespaces needed: [n=0] [13:13:37.625] - Finding globals in 'X' for chunk #5 ... DONE [13:13:37.626] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.626] - seeds: [13:13:37.626] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.644] Created future: [13:13:37.644] MultisessionFuture: [13:13:37.644] Label: 'future_lapply-5' [13:13:37.644] Expression: [13:13:37.644] { [13:13:37.644] do.call(function(...) { [13:13:37.644] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.644] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.644] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.644] on.exit(options(oopts), add = TRUE) [13:13:37.644] } [13:13:37.644] { [13:13:37.644] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.644] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.644] ...future.FUN(...future.X_jj, ...) [13:13:37.644] }) [13:13:37.644] } [13:13:37.644] }, args = future.call.arguments) [13:13:37.644] } [13:13:37.644] Lazy evaluation: FALSE [13:13:37.644] Asynchronous evaluation: TRUE [13:13:37.644] Local evaluation: TRUE [13:13:37.644] Environment: R_GlobalEnv [13:13:37.644] Capture standard output: TRUE [13:13:37.644] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.644] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.644] Packages: [13:13:37.644] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.644] Resolved: TRUE [13:13:37.644] Value: [13:13:37.644] Conditions captured: [13:13:37.644] Early signaling: FALSE [13:13:37.644] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.644] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.682] Chunk #5 of 10 ... DONE [13:13:37.682] Chunk #6 of 10 ... [13:13:37.682] - Finding globals in 'X' for chunk #6 ... [13:13:37.683] + additional globals found: [n=0] [13:13:37.683] + additional namespaces needed: [n=0] [13:13:37.683] - Finding globals in 'X' for chunk #6 ... DONE [13:13:37.683] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.684] - seeds: [13:13:37.684] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.703] Created future: [13:13:37.703] MultisessionFuture: [13:13:37.703] Label: 'future_lapply-6' [13:13:37.703] Expression: [13:13:37.703] { [13:13:37.703] do.call(function(...) { [13:13:37.703] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.703] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.703] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.703] on.exit(options(oopts), add = TRUE) [13:13:37.703] } [13:13:37.703] { [13:13:37.703] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.703] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.703] ...future.FUN(...future.X_jj, ...) [13:13:37.703] }) [13:13:37.703] } [13:13:37.703] }, args = future.call.arguments) [13:13:37.703] } [13:13:37.703] Lazy evaluation: FALSE [13:13:37.703] Asynchronous evaluation: TRUE [13:13:37.703] Local evaluation: TRUE [13:13:37.703] Environment: R_GlobalEnv [13:13:37.703] Capture standard output: TRUE [13:13:37.703] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.703] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.703] Packages: [13:13:37.703] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.703] Resolved: TRUE [13:13:37.703] Value: [13:13:37.703] Conditions captured: [13:13:37.703] Early signaling: FALSE [13:13:37.703] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.703] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.720] Chunk #6 of 10 ... DONE [13:13:37.720] Chunk #7 of 10 ... [13:13:37.720] - Finding globals in 'X' for chunk #7 ... [13:13:37.721] + additional globals found: [n=0] [13:13:37.721] + additional namespaces needed: [n=0] [13:13:37.721] - Finding globals in 'X' for chunk #7 ... DONE [13:13:37.721] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.721] - seeds: [13:13:37.721] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.740] Created future: [13:13:37.740] MultisessionFuture: [13:13:37.740] Label: 'future_lapply-7' [13:13:37.740] Expression: [13:13:37.740] { [13:13:37.740] do.call(function(...) { [13:13:37.740] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.740] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.740] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.740] on.exit(options(oopts), add = TRUE) [13:13:37.740] } [13:13:37.740] { [13:13:37.740] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.740] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.740] ...future.FUN(...future.X_jj, ...) [13:13:37.740] }) [13:13:37.740] } [13:13:37.740] }, args = future.call.arguments) [13:13:37.740] } [13:13:37.740] Lazy evaluation: FALSE [13:13:37.740] Asynchronous evaluation: TRUE [13:13:37.740] Local evaluation: TRUE [13:13:37.740] Environment: R_GlobalEnv [13:13:37.740] Capture standard output: TRUE [13:13:37.740] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.740] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.740] Packages: [13:13:37.740] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.740] Resolved: TRUE [13:13:37.740] Value: [13:13:37.740] Conditions captured: [13:13:37.740] Early signaling: FALSE [13:13:37.740] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.740] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.761] Chunk #7 of 10 ... DONE [13:13:37.761] Chunk #8 of 10 ... [13:13:37.762] - Finding globals in 'X' for chunk #8 ... [13:13:37.762] + additional globals found: [n=0] [13:13:37.763] + additional namespaces needed: [n=0] [13:13:37.763] - Finding globals in 'X' for chunk #8 ... DONE [13:13:37.763] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.763] - seeds: [13:13:37.764] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.782] Created future: [13:13:37.783] MultisessionFuture: [13:13:37.783] Label: 'future_lapply-8' [13:13:37.783] Expression: [13:13:37.783] { [13:13:37.783] do.call(function(...) { [13:13:37.783] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.783] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.783] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.783] on.exit(options(oopts), add = TRUE) [13:13:37.783] } [13:13:37.783] { [13:13:37.783] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.783] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.783] ...future.FUN(...future.X_jj, ...) [13:13:37.783] }) [13:13:37.783] } [13:13:37.783] }, args = future.call.arguments) [13:13:37.783] } [13:13:37.783] Lazy evaluation: FALSE [13:13:37.783] Asynchronous evaluation: TRUE [13:13:37.783] Local evaluation: TRUE [13:13:37.783] Environment: R_GlobalEnv [13:13:37.783] Capture standard output: TRUE [13:13:37.783] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.783] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.783] Packages: [13:13:37.783] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.783] Resolved: TRUE [13:13:37.783] Value: [13:13:37.783] Conditions captured: [13:13:37.783] Early signaling: FALSE [13:13:37.783] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.783] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.800] Chunk #8 of 10 ... DONE [13:13:37.801] Chunk #9 of 10 ... [13:13:37.801] - Finding globals in 'X' for chunk #9 ... [13:13:37.801] + additional globals found: [n=0] [13:13:37.801] + additional namespaces needed: [n=0] [13:13:37.801] - Finding globals in 'X' for chunk #9 ... DONE [13:13:37.802] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.802] - seeds: [13:13:37.802] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.820] Created future: [13:13:37.820] MultisessionFuture: [13:13:37.820] Label: 'future_lapply-9' [13:13:37.820] Expression: [13:13:37.820] { [13:13:37.820] do.call(function(...) { [13:13:37.820] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.820] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.820] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.820] on.exit(options(oopts), add = TRUE) [13:13:37.820] } [13:13:37.820] { [13:13:37.820] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.820] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.820] ...future.FUN(...future.X_jj, ...) [13:13:37.820] }) [13:13:37.820] } [13:13:37.820] }, args = future.call.arguments) [13:13:37.820] } [13:13:37.820] Lazy evaluation: FALSE [13:13:37.820] Asynchronous evaluation: TRUE [13:13:37.820] Local evaluation: TRUE [13:13:37.820] Environment: R_GlobalEnv [13:13:37.820] Capture standard output: TRUE [13:13:37.820] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.820] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.820] Packages: [13:13:37.820] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.820] Resolved: TRUE [13:13:37.820] Value: [13:13:37.820] Conditions captured: [13:13:37.820] Early signaling: FALSE [13:13:37.820] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.820] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.838] Chunk #9 of 10 ... DONE [13:13:37.838] Chunk #10 of 10 ... [13:13:37.838] - Finding globals in 'X' for chunk #10 ... [13:13:37.839] + additional globals found: [n=0] [13:13:37.839] + additional namespaces needed: [n=0] [13:13:37.839] - Finding globals in 'X' for chunk #10 ... DONE [13:13:37.839] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [13:13:37.839] - seeds: [13:13:37.839] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.856] Created future: [13:13:37.856] MultisessionFuture: [13:13:37.856] Label: 'future_lapply-10' [13:13:37.856] Expression: [13:13:37.856] { [13:13:37.856] do.call(function(...) { [13:13:37.856] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.856] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.856] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.856] on.exit(options(oopts), add = TRUE) [13:13:37.856] } [13:13:37.856] { [13:13:37.856] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.856] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.856] ...future.FUN(...future.X_jj, ...) [13:13:37.856] }) [13:13:37.856] } [13:13:37.856] }, args = future.call.arguments) [13:13:37.856] } [13:13:37.856] Lazy evaluation: FALSE [13:13:37.856] Asynchronous evaluation: TRUE [13:13:37.856] Local evaluation: TRUE [13:13:37.856] Environment: R_GlobalEnv [13:13:37.856] Capture standard output: TRUE [13:13:37.856] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.856] Globals: 5 objects totaling 2.29 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 448 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.856] Packages: [13:13:37.856] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.856] Resolved: TRUE [13:13:37.856] Value: [13:13:37.856] Conditions captured: [13:13:37.856] Early signaling: FALSE [13:13:37.856] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.856] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.874] Chunk #10 of 10 ... DONE [13:13:37.874] Launching 10 futures (chunks) ... DONE [13:13:37.875] Resolving 10 futures (chunks) ... [13:13:37.879] - Number of value chunks collected: 10 [13:13:37.879] Resolving 10 futures (chunks) ... DONE [13:13:37.879] Reducing values from 10 chunks ... [13:13:37.879] - Number of values collected after concatenation: 10 [13:13:37.879] - Number of values expected: 10 [13:13:37.880] Reducing values from 10 chunks ... DONE [13:13:37.880] future_lapply() ... DONE List of 10 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 maxSize = 2305.6 bytes future.globals.maxSize = 2305.6 bytes [13:13:37.884] future_lapply() ... [13:13:37.887] Number of chunks: 5 [13:13:37.888] getGlobalsAndPackagesXApply() ... [13:13:37.888] - future.globals: TRUE [13:13:37.890] - globals found/used: [n=1] 'FUN' [13:13:37.890] - needed namespaces: [n=0] [13:13:37.890] Finding globals ... DONE [13:13:37.890] - use_args: TRUE [13:13:37.891] - Getting '...' globals ... [13:13:37.891] - '...' content: [n=0] [13:13:37.891] List of 1 [13:13:37.891] $ ...: list() [13:13:37.891] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.891] - attr(*, "where")=List of 1 [13:13:37.891] ..$ ...: [13:13:37.891] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.891] - attr(*, "resolved")= logi TRUE [13:13:37.891] - attr(*, "total_size")= num NA [13:13:37.894] - Getting '...' globals ... DONE [13:13:37.895] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:37.895] List of 2 [13:13:37.895] $ ...future.FUN:function (x) [13:13:37.895] $ ... : list() [13:13:37.895] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:37.895] - attr(*, "where")=List of 2 [13:13:37.895] ..$ ...future.FUN: [13:13:37.895] ..$ ... : [13:13:37.895] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:37.895] - attr(*, "resolved")= logi FALSE [13:13:37.895] - attr(*, "total_size")= num 1840 [13:13:37.898] Packages to be attached in all futures: [n=0] [13:13:37.898] getGlobalsAndPackagesXApply() ... DONE [13:13:37.899] Number of futures (= number of chunks): 5 [13:13:37.899] Launching 5 futures (chunks) ... [13:13:37.899] Chunk #1 of 5 ... [13:13:37.899] - Finding globals in 'X' for chunk #1 ... [13:13:37.899] + additional globals found: [n=0] [13:13:37.900] + additional namespaces needed: [n=0] [13:13:37.900] - Finding globals in 'X' for chunk #1 ... DONE [13:13:37.900] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [13:13:37.900] - seeds: [13:13:37.900] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.916] Created future: [13:13:37.916] MultisessionFuture: [13:13:37.916] Label: 'future_lapply-1' [13:13:37.916] Expression: [13:13:37.916] { [13:13:37.916] do.call(function(...) { [13:13:37.916] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.916] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.916] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.916] on.exit(options(oopts), add = TRUE) [13:13:37.916] } [13:13:37.916] { [13:13:37.916] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.916] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.916] ...future.FUN(...future.X_jj, ...) [13:13:37.916] }) [13:13:37.916] } [13:13:37.916] }, args = future.call.arguments) [13:13:37.916] } [13:13:37.916] Lazy evaluation: FALSE [13:13:37.916] Asynchronous evaluation: TRUE [13:13:37.916] Local evaluation: TRUE [13:13:37.916] Environment: R_GlobalEnv [13:13:37.916] Capture standard output: TRUE [13:13:37.916] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.916] Globals: 5 objects totaling 2.73 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 896 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.916] Packages: [13:13:37.916] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.916] Resolved: TRUE [13:13:37.916] Value: [13:13:37.916] Conditions captured: [13:13:37.916] Early signaling: FALSE [13:13:37.916] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.916] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.933] Chunk #1 of 5 ... DONE [13:13:37.933] Chunk #2 of 5 ... [13:13:37.933] - Finding globals in 'X' for chunk #2 ... [13:13:37.934] + additional globals found: [n=0] [13:13:37.934] + additional namespaces needed: [n=0] [13:13:37.934] - Finding globals in 'X' for chunk #2 ... DONE [13:13:37.934] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [13:13:37.934] - seeds: [13:13:37.934] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.953] Created future: [13:13:37.953] MultisessionFuture: [13:13:37.953] Label: 'future_lapply-2' [13:13:37.953] Expression: [13:13:37.953] { [13:13:37.953] do.call(function(...) { [13:13:37.953] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.953] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.953] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.953] on.exit(options(oopts), add = TRUE) [13:13:37.953] } [13:13:37.953] { [13:13:37.953] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.953] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.953] ...future.FUN(...future.X_jj, ...) [13:13:37.953] }) [13:13:37.953] } [13:13:37.953] }, args = future.call.arguments) [13:13:37.953] } [13:13:37.953] Lazy evaluation: FALSE [13:13:37.953] Asynchronous evaluation: TRUE [13:13:37.953] Local evaluation: TRUE [13:13:37.953] Environment: R_GlobalEnv [13:13:37.953] Capture standard output: TRUE [13:13:37.953] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.953] Globals: 5 objects totaling 2.73 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 896 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.953] Packages: [13:13:37.953] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.953] Resolved: TRUE [13:13:37.953] Value: [13:13:37.953] Conditions captured: [13:13:37.953] Early signaling: FALSE [13:13:37.953] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.953] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:37.971] Chunk #2 of 5 ... DONE [13:13:37.971] Chunk #3 of 5 ... [13:13:37.972] - Finding globals in 'X' for chunk #3 ... [13:13:37.972] + additional globals found: [n=0] [13:13:37.972] + additional namespaces needed: [n=0] [13:13:37.972] - Finding globals in 'X' for chunk #3 ... DONE [13:13:37.972] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [13:13:37.973] - seeds: [13:13:37.973] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:37.988] Created future: [13:13:37.988] MultisessionFuture: [13:13:37.988] Label: 'future_lapply-3' [13:13:37.988] Expression: [13:13:37.988] { [13:13:37.988] do.call(function(...) { [13:13:37.988] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:37.988] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:37.988] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:37.988] on.exit(options(oopts), add = TRUE) [13:13:37.988] } [13:13:37.988] { [13:13:37.988] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:37.988] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:37.988] ...future.FUN(...future.X_jj, ...) [13:13:37.988] }) [13:13:37.988] } [13:13:37.988] }, args = future.call.arguments) [13:13:37.988] } [13:13:37.988] Lazy evaluation: FALSE [13:13:37.988] Asynchronous evaluation: TRUE [13:13:37.988] Local evaluation: TRUE [13:13:37.988] Environment: R_GlobalEnv [13:13:37.988] Capture standard output: TRUE [13:13:37.988] Capture condition classes: 'condition' (excluding 'nothing') [13:13:37.988] Globals: 5 objects totaling 2.73 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 896 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:37.988] Packages: [13:13:37.988] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:37.988] Resolved: TRUE [13:13:37.988] Value: [13:13:37.988] Conditions captured: [13:13:37.988] Early signaling: FALSE [13:13:37.988] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:37.988] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.005] Chunk #3 of 5 ... DONE [13:13:38.006] Chunk #4 of 5 ... [13:13:38.006] - Finding globals in 'X' for chunk #4 ... [13:13:38.006] + additional globals found: [n=0] [13:13:38.006] + additional namespaces needed: [n=0] [13:13:38.006] - Finding globals in 'X' for chunk #4 ... DONE [13:13:38.007] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [13:13:38.007] - seeds: [13:13:38.007] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:38.022] Created future: [13:13:38.022] MultisessionFuture: [13:13:38.022] Label: 'future_lapply-4' [13:13:38.022] Expression: [13:13:38.022] { [13:13:38.022] do.call(function(...) { [13:13:38.022] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:38.022] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:38.022] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:38.022] on.exit(options(oopts), add = TRUE) [13:13:38.022] } [13:13:38.022] { [13:13:38.022] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:38.022] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:38.022] ...future.FUN(...future.X_jj, ...) [13:13:38.022] }) [13:13:38.022] } [13:13:38.022] }, args = future.call.arguments) [13:13:38.022] } [13:13:38.022] Lazy evaluation: FALSE [13:13:38.022] Asynchronous evaluation: TRUE [13:13:38.022] Local evaluation: TRUE [13:13:38.022] Environment: R_GlobalEnv [13:13:38.022] Capture standard output: TRUE [13:13:38.022] Capture condition classes: 'condition' (excluding 'nothing') [13:13:38.022] Globals: 5 objects totaling 2.73 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 896 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:38.022] Packages: [13:13:38.022] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:38.022] Resolved: TRUE [13:13:38.022] Value: [13:13:38.022] Conditions captured: [13:13:38.022] Early signaling: FALSE [13:13:38.022] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:38.022] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.038] Chunk #4 of 5 ... DONE [13:13:38.038] Chunk #5 of 5 ... [13:13:38.038] - Finding globals in 'X' for chunk #5 ... [13:13:38.039] + additional globals found: [n=0] [13:13:38.039] + additional namespaces needed: [n=0] [13:13:38.039] - Finding globals in 'X' for chunk #5 ... DONE [13:13:38.039] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [13:13:38.039] - seeds: [13:13:38.039] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:38.055] Created future: [13:13:38.055] MultisessionFuture: [13:13:38.055] Label: 'future_lapply-5' [13:13:38.055] Expression: [13:13:38.055] { [13:13:38.055] do.call(function(...) { [13:13:38.055] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:38.055] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:38.055] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:38.055] on.exit(options(oopts), add = TRUE) [13:13:38.055] } [13:13:38.055] { [13:13:38.055] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:38.055] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:38.055] ...future.FUN(...future.X_jj, ...) [13:13:38.055] }) [13:13:38.055] } [13:13:38.055] }, args = future.call.arguments) [13:13:38.055] } [13:13:38.055] Lazy evaluation: FALSE [13:13:38.055] Asynchronous evaluation: TRUE [13:13:38.055] Local evaluation: TRUE [13:13:38.055] Environment: R_GlobalEnv [13:13:38.055] Capture standard output: TRUE [13:13:38.055] Capture condition classes: 'condition' (excluding 'nothing') [13:13:38.055] Globals: 5 objects totaling 2.73 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 896 bytes, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:38.055] Packages: [13:13:38.055] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:38.055] Resolved: TRUE [13:13:38.055] Value: [13:13:38.055] Conditions captured: [13:13:38.055] Early signaling: FALSE [13:13:38.055] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:38.055] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.072] Chunk #5 of 5 ... DONE [13:13:38.072] Launching 5 futures (chunks) ... DONE [13:13:38.072] Resolving 5 futures (chunks) ... [13:13:38.074] - Number of value chunks collected: 5 [13:13:38.074] Resolving 5 futures (chunks) ... DONE [13:13:38.074] Reducing values from 5 chunks ... [13:13:38.074] - Number of values collected after concatenation: 10 [13:13:38.074] - Number of values expected: 10 [13:13:38.074] Reducing values from 5 chunks ... DONE [13:13:38.074] future_lapply() ... DONE List of 10 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 maxSize = 2305.6 bytes future.globals.maxSize = 2305.6 bytes [13:13:38.078] future_lapply() ... [13:13:38.081] Number of chunks: 2 [13:13:38.081] getGlobalsAndPackagesXApply() ... [13:13:38.081] - future.globals: TRUE [13:13:38.083] - globals found/used: [n=1] 'FUN' [13:13:38.083] - needed namespaces: [n=0] [13:13:38.083] Finding globals ... DONE [13:13:38.083] - use_args: TRUE [13:13:38.084] - Getting '...' globals ... [13:13:38.084] - '...' content: [n=0] [13:13:38.084] List of 1 [13:13:38.084] $ ...: list() [13:13:38.084] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.084] - attr(*, "where")=List of 1 [13:13:38.084] ..$ ...: [13:13:38.084] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.084] - attr(*, "resolved")= logi TRUE [13:13:38.084] - attr(*, "total_size")= num NA [13:13:38.087] - Getting '...' globals ... DONE [13:13:38.087] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:38.087] List of 2 [13:13:38.087] $ ...future.FUN:function (x) [13:13:38.087] $ ... : list() [13:13:38.087] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.087] - attr(*, "where")=List of 2 [13:13:38.087] ..$ ...future.FUN: [13:13:38.087] ..$ ... : [13:13:38.087] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.087] - attr(*, "resolved")= logi FALSE [13:13:38.087] - attr(*, "total_size")= num 1840 [13:13:38.090] Packages to be attached in all futures: [n=0] [13:13:38.090] getGlobalsAndPackagesXApply() ... DONE [13:13:38.090] Number of futures (= number of chunks): 2 [13:13:38.091] Launching 2 futures (chunks) ... [13:13:38.091] Chunk #1 of 2 ... [13:13:38.091] - Finding globals in 'X' for chunk #1 ... [13:13:38.091] + additional globals found: [n=0] [13:13:38.091] + additional namespaces needed: [n=0] [13:13:38.091] - Finding globals in 'X' for chunk #1 ... DONE [13:13:38.092] - Adjusted option 'future.globals.maxSize': 2306 -> 2 * 2306 = 4611 (bytes) [13:13:38.092] - seeds: [13:13:38.092] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:38.105] Created future: [13:13:38.105] MultisessionFuture: [13:13:38.105] Label: 'future_lapply-1' [13:13:38.105] Expression: [13:13:38.105] { [13:13:38.105] do.call(function(...) { [13:13:38.105] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:38.105] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:38.105] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:38.105] on.exit(options(oopts), add = TRUE) [13:13:38.105] } [13:13:38.105] { [13:13:38.105] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:38.105] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:38.105] ...future.FUN(...future.X_jj, ...) [13:13:38.105] }) [13:13:38.105] } [13:13:38.105] }, args = future.call.arguments) [13:13:38.105] } [13:13:38.105] Lazy evaluation: FALSE [13:13:38.105] Asynchronous evaluation: TRUE [13:13:38.105] Local evaluation: TRUE [13:13:38.105] Environment: R_GlobalEnv [13:13:38.105] Capture standard output: TRUE [13:13:38.105] Capture condition classes: 'condition' (excluding 'nothing') [13:13:38.105] Globals: 5 objects totaling 4.04 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 2.19 KiB, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:38.105] Packages: [13:13:38.105] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:38.105] Resolved: TRUE [13:13:38.105] Value: [13:13:38.105] Conditions captured: [13:13:38.105] Early signaling: FALSE [13:13:38.105] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:38.105] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.123] Chunk #1 of 2 ... DONE [13:13:38.123] Chunk #2 of 2 ... [13:13:38.123] - Finding globals in 'X' for chunk #2 ... [13:13:38.124] + additional globals found: [n=0] [13:13:38.124] + additional namespaces needed: [n=0] [13:13:38.124] - Finding globals in 'X' for chunk #2 ... DONE [13:13:38.124] - Adjusted option 'future.globals.maxSize': 2306 -> 2 * 2306 = 4611 (bytes) [13:13:38.124] - seeds: [13:13:38.124] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:38.141] Created future: [13:13:38.141] MultisessionFuture: [13:13:38.141] Label: 'future_lapply-2' [13:13:38.141] Expression: [13:13:38.141] { [13:13:38.141] do.call(function(...) { [13:13:38.141] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:38.141] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:38.141] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:38.141] on.exit(options(oopts), add = TRUE) [13:13:38.141] } [13:13:38.141] { [13:13:38.141] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:38.141] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:38.141] ...future.FUN(...future.X_jj, ...) [13:13:38.141] }) [13:13:38.141] } [13:13:38.141] }, args = future.call.arguments) [13:13:38.141] } [13:13:38.141] Lazy evaluation: FALSE [13:13:38.141] Asynchronous evaluation: TRUE [13:13:38.141] Local evaluation: TRUE [13:13:38.141] Environment: R_GlobalEnv [13:13:38.141] Capture standard output: TRUE [13:13:38.141] Capture condition classes: 'condition' (excluding 'nothing') [13:13:38.141] Globals: 5 objects totaling 4.04 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 2.19 KiB, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:38.141] Packages: [13:13:38.141] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:38.141] Resolved: TRUE [13:13:38.141] Value: [13:13:38.141] Conditions captured: [13:13:38.141] Early signaling: FALSE [13:13:38.141] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:38.141] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.158] Chunk #2 of 2 ... DONE [13:13:38.158] Launching 2 futures (chunks) ... DONE [13:13:38.158] Resolving 2 futures (chunks) ... [13:13:38.159] - Number of value chunks collected: 2 [13:13:38.159] Resolving 2 futures (chunks) ... DONE [13:13:38.160] Reducing values from 2 chunks ... [13:13:38.160] - Number of values collected after concatenation: 10 [13:13:38.160] - Number of values expected: 10 [13:13:38.160] Reducing values from 2 chunks ... DONE [13:13:38.160] future_lapply() ... DONE List of 10 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 maxSize = 2305.6 bytes future.globals.maxSize = 2305.6 bytes [13:13:38.164] future_lapply() ... [13:13:38.166] Number of chunks: 1 [13:13:38.166] getGlobalsAndPackagesXApply() ... [13:13:38.166] - future.globals: TRUE [13:13:38.168] - globals found/used: [n=1] 'FUN' [13:13:38.168] - needed namespaces: [n=0] [13:13:38.168] Finding globals ... DONE [13:13:38.168] - use_args: TRUE [13:13:38.168] - Getting '...' globals ... [13:13:38.169] - '...' content: [n=0] [13:13:38.169] List of 1 [13:13:38.169] $ ...: list() [13:13:38.169] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.169] - attr(*, "where")=List of 1 [13:13:38.169] ..$ ...: [13:13:38.169] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.169] - attr(*, "resolved")= logi TRUE [13:13:38.169] - attr(*, "total_size")= num NA [13:13:38.172] - Getting '...' globals ... DONE [13:13:38.172] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:38.172] List of 2 [13:13:38.172] $ ...future.FUN:function (x) [13:13:38.172] $ ... : list() [13:13:38.172] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.172] - attr(*, "where")=List of 2 [13:13:38.172] ..$ ...future.FUN: [13:13:38.172] ..$ ... : [13:13:38.172] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.172] - attr(*, "resolved")= logi FALSE [13:13:38.172] - attr(*, "total_size")= num 1840 [13:13:38.176] Packages to be attached in all futures: [n=0] [13:13:38.176] getGlobalsAndPackagesXApply() ... DONE [13:13:38.176] Number of futures (= number of chunks): 1 [13:13:38.176] Launching 1 futures (chunks) ... [13:13:38.176] Chunk #1 of 1 ... [13:13:38.176] - Finding globals in 'X' for chunk #1 ... [13:13:38.177] + additional globals found: [n=0] [13:13:38.177] + additional namespaces needed: [n=0] [13:13:38.177] - Finding globals in 'X' for chunk #1 ... DONE [13:13:38.177] - seeds: [13:13:38.177] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [13:13:38.191] Created future: [13:13:38.192] MultisessionFuture: [13:13:38.192] Label: 'future_lapply-1' [13:13:38.192] Expression: [13:13:38.192] { [13:13:38.192] do.call(function(...) { [13:13:38.192] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [13:13:38.192] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [13:13:38.192] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [13:13:38.192] on.exit(options(oopts), add = TRUE) [13:13:38.192] } [13:13:38.192] { [13:13:38.192] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [13:13:38.192] ...future.X_jj <- ...future.elements_ii[[jj]] [13:13:38.192] ...future.FUN(...future.X_jj, ...) [13:13:38.192] }) [13:13:38.192] } [13:13:38.192] }, args = future.call.arguments) [13:13:38.192] } [13:13:38.192] Lazy evaluation: FALSE [13:13:38.192] Asynchronous evaluation: TRUE [13:13:38.192] Local evaluation: TRUE [13:13:38.192] Environment: R_GlobalEnv [13:13:38.192] Capture standard output: TRUE [13:13:38.192] Capture condition classes: 'condition' (excluding 'nothing') [13:13:38.192] Globals: 5 objects totaling 6.23 KiB (function '...future.FUN' of 1.80 KiB, DotDotDotList 'future.call.arguments' of 0 bytes, list '...future.elements_ii' of 4.38 KiB, NULL '...future.seeds_ii' of 0 bytes, numeric '...future.globals.maxSize' of 56 bytes) [13:13:38.192] Packages: [13:13:38.192] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [13:13:38.192] Resolved: TRUE [13:13:38.192] Value: [13:13:38.192] Conditions captured: [13:13:38.192] Early signaling: FALSE [13:13:38.192] Owner process: 52fb5151-35c5-e9f4-7776-f0c655e69c7e [13:13:38.192] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [13:13:38.208] Chunk #1 of 1 ... DONE [13:13:38.208] Launching 1 futures (chunks) ... DONE [13:13:38.208] Resolving 1 futures (chunks) ... [13:13:38.209] - Number of value chunks collected: 1 [13:13:38.209] Resolving 1 futures (chunks) ... DONE [13:13:38.209] Reducing values from 1 chunks ... [13:13:38.209] - Number of values collected after concatenation: 10 [13:13:38.209] - Number of values expected: 10 [13:13:38.210] Reducing values from 1 chunks ... DONE [13:13:38.210] future_lapply() ... DONE List of 10 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 $ : num 2306 maxSize = 2305.6 bytes future.globals.maxSize = 2305.6 bytes > y <- NULL > options(future.globals.maxSize = oMaxSize) > > > message("*** future_lapply() - too large ... DONE") *** future_lapply() - too large ... DONE > > > message("*** future_lapply() - globals exceptions ...") *** future_lapply() - globals exceptions ... > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = 42) + }, error = identity) [13:13:38.213] future_lapply() ... [13:13:38.215] Number of chunks: 1 [13:13:38.215] getGlobalsAndPackagesXApply() ... [13:13:38.216] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = list(1)) + }, error = identity) [13:13:38.216] future_lapply() ... [13:13:38.218] Number of chunks: 1 [13:13:38.218] getGlobalsAndPackagesXApply() ... [13:13:38.218] - future.globals: with names '1' [13:13:38.218] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = "...future.FUN") + }, error = identity) [13:13:38.218] future_lapply() ... [13:13:38.220] Number of chunks: 1 [13:13:38.220] getGlobalsAndPackagesXApply() ... [13:13:38.221] - future.globals: '...future.FUN' [13:13:38.221] - use_args: TRUE [13:13:38.221] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = "...future.FUN") + }, error = identity) [13:13:38.221] future_lapply() ... [13:13:38.223] Number of chunks: 1 [13:13:38.223] getGlobalsAndPackagesXApply() ... [13:13:38.223] - future.globals: '...future.FUN' [13:13:38.224] - use_args: TRUE [13:13:38.224] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > ...future.elements_ii <- 42L > X <- list(function() 2 * ...future.elements_ii) > res <- tryCatch({ + y <- future_lapply(X, FUN = function(f) f()) + }, error = identity) [13:13:38.224] future_lapply() ... [13:13:38.226] Number of chunks: 1 [13:13:38.226] getGlobalsAndPackagesXApply() ... [13:13:38.226] - future.globals: TRUE [13:13:38.228] - globals found/used: [n=1] 'FUN' [13:13:38.228] - needed namespaces: [n=0] [13:13:38.228] Finding globals ... DONE [13:13:38.228] - use_args: TRUE [13:13:38.228] - Getting '...' globals ... [13:13:38.229] - '...' content: [n=0] [13:13:38.229] List of 1 [13:13:38.229] $ ...: list() [13:13:38.229] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.229] - attr(*, "where")=List of 1 [13:13:38.229] ..$ ...: [13:13:38.229] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.229] - attr(*, "resolved")= logi TRUE [13:13:38.229] - attr(*, "total_size")= num NA [13:13:38.231] - Getting '...' globals ... DONE [13:13:38.231] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [13:13:38.231] List of 2 [13:13:38.231] $ ...future.FUN:function (f) [13:13:38.231] $ ... : list() [13:13:38.231] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [13:13:38.231] - attr(*, "where")=List of 2 [13:13:38.231] ..$ ...future.FUN: [13:13:38.231] ..$ ... : [13:13:38.231] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [13:13:38.231] - attr(*, "resolved")= logi FALSE [13:13:38.231] - attr(*, "total_size")= num 336 [13:13:38.234] Packages to be attached in all futures: [n=0] [13:13:38.234] getGlobalsAndPackagesXApply() ... DONE [13:13:38.234] Number of futures (= number of chunks): 1 [13:13:38.234] Launching 1 futures (chunks) ... [13:13:38.234] Chunk #1 of 1 ... [13:13:38.235] - Finding globals in 'X' for chunk #1 ... [13:13:38.236] + additional globals found: [n=1] '...future.elements_ii' [13:13:38.238] + additional namespaces needed: [n=0] > stopifnot(inherits(res, "error")) > > message("*** future_lapply() - globals exceptions ... DONE") *** future_lapply() - globals exceptions ... DONE > > source("incl/end.R") > > proc.time() user system elapsed 2.46 0.12 4.26