R version 4.4.0 alpha (2024-03-26 r86209 ucrt) Copyright (C) 2024 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 [15:31:38.494] plan(): Setting new future strategy stack: [15:31:38.495] List of future strategies: [15:31:38.495] 1. sequential: [15:31:38.495] - args: function (..., envir = parent.frame(), workers = "") [15:31:38.495] - tweaked: FALSE [15:31:38.495] - call: future::plan("sequential") [15:31:38.512] 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' [15:31:39.633] future_lapply() ... [15:31:39.641] Number of chunks: 1 [15:31:39.641] getGlobalsAndPackagesXApply() ... [15:31:39.642] - future.globals: FALSE [15:31:39.647] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [15:31:39.647] - needed namespaces: [n=0] [15:31:39.648] Finding globals ... DONE [15:31:39.648] - use_args: TRUE [15:31:39.648] - Getting '...' globals ... [15:31:39.650] - '...' content: [n=0] [15:31:39.650] List of 1 [15:31:39.650] $ ...: list() [15:31:39.650] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.650] - attr(*, "where")=List of 1 [15:31:39.650] ..$ ...: [15:31:39.650] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.650] - attr(*, "resolved")= logi TRUE [15:31:39.650] - attr(*, "total_size")= num NA [15:31:39.657] - Getting '...' globals ... DONE [15:31:39.657] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [15:31:39.658] List of 3 [15:31:39.658] $ ...future.FUN :function (x) [15:31:39.658] $ future.call.arguments: list() [15:31:39.658] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.658] $ ... : list() [15:31:39.658] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.658] - attr(*, "where")=List of 3 [15:31:39.658] ..$ ...future.FUN : [15:31:39.658] ..$ future.call.arguments: [15:31:39.658] ..$ ... : [15:31:39.658] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.658] - attr(*, "resolved")= logi FALSE [15:31:39.658] - attr(*, "total_size")= num 3824 [15:31:39.666] Packages to be attached in all futures: [n=1] 'utils' [15:31:39.666] getGlobalsAndPackagesXApply() ... DONE [15:31:39.667] Number of futures (= number of chunks): 1 [15:31:39.667] Launching 1 futures (chunks) ... [15:31:39.668] Chunk #1 of 1 ... [15:31:39.669] - seeds: [15:31:39.669] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:39.684] Created future: [15:31:39.685] ClusterFuture: [15:31:39.685] Label: 'future_lapply-1' [15:31:39.685] Expression: [15:31:39.685] { [15:31:39.685] do.call(function(...) { [15:31:39.685] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:39.685] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:39.685] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:39.685] on.exit(options(oopts), add = TRUE) [15:31:39.685] } [15:31:39.685] { [15:31:39.685] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:39.685] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:39.685] ...future.FUN(...future.X_jj, ...) [15:31:39.685] }) [15:31:39.685] } [15:31:39.685] }, args = future.call.arguments) [15:31:39.685] } [15:31:39.685] Lazy evaluation: FALSE [15:31:39.685] Asynchronous evaluation: TRUE [15:31:39.685] Local evaluation: TRUE [15:31:39.685] Environment: R_GlobalEnv [15:31:39.685] Capture standard output: TRUE [15:31:39.685] Capture condition classes: 'condition' (excluding 'nothing') [15:31:39.685] 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) [15:31:39.685] Packages: 1 packages ('utils') [15:31:39.685] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:39.685] Resolved: TRUE [15:31:39.685] Value: [15:31:39.685] Conditions captured: [15:31:39.685] Early signaling: FALSE [15:31:39.685] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:39.685] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:39.707] Chunk #1 of 1 ... DONE [15:31:39.707] Launching 1 futures (chunks) ... DONE [15:31:39.708] Resolving 1 futures (chunks) ... Globals set 'B' [15:31:39.710] future_lapply() ... [15:31:39.712] Number of chunks: 1 [15:31:39.712] getGlobalsAndPackagesXApply() ... [15:31:39.713] - future.globals: TRUE [15:31:39.720] - globals found/used: [n=3] 'FUN', 'a', 'b' [15:31:39.720] - needed namespaces: [n=1] 'stats' [15:31:39.720] Finding globals ... DONE [15:31:39.721] - use_args: TRUE [15:31:39.721] - Getting '...' globals ... [15:31:39.722] - '...' content: [n=0] [15:31:39.722] List of 1 [15:31:39.722] $ ...: list() [15:31:39.722] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.722] - attr(*, "where")=List of 1 [15:31:39.722] ..$ ...: [15:31:39.722] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.722] - attr(*, "resolved")= logi TRUE [15:31:39.722] - attr(*, "total_size")= num NA [15:31:39.729] - Getting '...' globals ... DONE [15:31:39.729] Globals to be used in all futures (chunks): [n=4] '...future.FUN', 'a', 'b', '...' [15:31:39.730] List of 4 [15:31:39.730] $ ...future.FUN:function (x) [15:31:39.730] $ a : num 1 [15:31:39.730] $ b : num 2 [15:31:39.730] $ ... : list() [15:31:39.730] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.730] - attr(*, "where")=List of 4 [15:31:39.730] ..$ ...future.FUN: [15:31:39.730] ..$ a : [15:31:39.730] ..$ b : [15:31:39.730] ..$ ... : [15:31:39.730] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.730] - attr(*, "resolved")= logi FALSE [15:31:39.730] - attr(*, "total_size")= num 3936 [15:31:39.738] Packages to be attached in all futures: [n=2] 'stats', 'utils' [15:31:39.745] getGlobalsAndPackagesXApply() ... DONE [15:31:39.746] Number of futures (= number of chunks): 1 [15:31:39.746] Launching 1 futures (chunks) ... [15:31:39.746] Chunk #1 of 1 ... [15:31:39.747] - Finding globals in 'X' for chunk #1 ... [15:31:39.748] + additional globals found: [n=0] [15:31:39.748] + additional namespaces needed: [n=0] [15:31:39.748] - Finding globals in 'X' for chunk #1 ... DONE [15:31:39.749] - seeds: [15:31:39.749] - All globals exported: [n=7] '...future.FUN', 'a', 'b', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:39.777] Created future: [15:31:39.777] ClusterFuture: [15:31:39.777] Label: 'future_lapply-1' [15:31:39.777] Expression: [15:31:39.777] { [15:31:39.777] do.call(function(...) { [15:31:39.777] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:39.777] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:39.777] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:39.777] on.exit(options(oopts), add = TRUE) [15:31:39.777] } [15:31:39.777] { [15:31:39.777] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:39.777] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:39.777] ...future.FUN(...future.X_jj, ...) [15:31:39.777] }) [15:31:39.777] } [15:31:39.777] }, args = future.call.arguments) [15:31:39.777] } [15:31:39.777] Lazy evaluation: FALSE [15:31:39.777] Asynchronous evaluation: TRUE [15:31:39.777] Local evaluation: TRUE [15:31:39.777] Environment: R_GlobalEnv [15:31:39.777] Capture standard output: TRUE [15:31:39.777] Capture condition classes: 'condition' (excluding 'nothing') [15:31:39.777] 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, ...) [15:31:39.777] Packages: 2 packages ('stats', 'utils') [15:31:39.777] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:39.777] Resolved: TRUE [15:31:39.777] Value: [15:31:39.777] Conditions captured: [15:31:39.777] Early signaling: FALSE [15:31:39.777] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:39.777] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:39.805] Chunk #1 of 1 ... DONE [15:31:39.805] Launching 1 futures (chunks) ... DONE [15:31:39.805] Resolving 1 futures (chunks) ... [15:31:39.806] - Number of value chunks collected: 1 [15:31:39.807] Resolving 1 futures (chunks) ... DONE [15:31:39.807] Reducing values from 1 chunks ... [15:31:39.807] - Number of values collected after concatenation: 1 [15:31:39.807] - Number of values expected: 1 [15:31:39.808] Reducing values from 1 chunks ... DONE [15:31:39.808] future_lapply() ... DONE [[1]] [1] 1 Globals set 'C' [15:31:39.808] future_lapply() ... [15:31:39.810] Number of chunks: 1 [15:31:39.810] getGlobalsAndPackagesXApply() ... [15:31:39.810] - future.globals: 'a', 'b' [15:31:39.811] - use_args: TRUE [15:31:39.811] Globals to be used in all futures (chunks): [n=4] 'a', 'b', '...future.FUN', '...' [15:31:39.811] List of 4 [15:31:39.811] $ a : num 1 [15:31:39.811] $ b : num 2 [15:31:39.811] $ ...future.FUN:function (x) [15:31:39.811] $ ... : list() [15:31:39.811] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.811] - attr(*, "where")=List of 4 [15:31:39.811] ..$ a : [15:31:39.811] ..$ b : [15:31:39.811] ..$ ...future.FUN: [15:31:39.811] ..$ ... : [15:31:39.811] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.811] - attr(*, "resolved")= logi FALSE [15:31:39.811] - attr(*, "total_size")= num NA [15:31:39.818] Packages to be attached in all futures: [n=1] 'utils' [15:31:39.818] getGlobalsAndPackagesXApply() ... DONE [15:31:39.819] Number of futures (= number of chunks): 1 [15:31:39.819] Launching 1 futures (chunks) ... [15:31:39.819] Chunk #1 of 1 ... [15:31:39.819] - seeds: [15:31:39.820] - All globals exported: [n=7] 'a', 'b', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:39.834] Created future: [15:31:39.834] ClusterFuture: [15:31:39.834] Label: 'future_lapply-1' [15:31:39.834] Expression: [15:31:39.834] { [15:31:39.834] do.call(function(...) { [15:31:39.834] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:39.834] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:39.834] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:39.834] on.exit(options(oopts), add = TRUE) [15:31:39.834] } [15:31:39.834] { [15:31:39.834] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:39.834] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:39.834] ...future.FUN(...future.X_jj, ...) [15:31:39.834] }) [15:31:39.834] } [15:31:39.834] }, args = future.call.arguments) [15:31:39.834] } [15:31:39.834] Lazy evaluation: FALSE [15:31:39.834] Asynchronous evaluation: TRUE [15:31:39.834] Local evaluation: TRUE [15:31:39.834] Environment: R_GlobalEnv [15:31:39.834] Capture standard output: TRUE [15:31:39.834] Capture condition classes: 'condition' (excluding 'nothing') [15:31:39.834] 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, ...) [15:31:39.834] Packages: 1 packages ('utils') [15:31:39.834] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:39.834] Resolved: TRUE [15:31:39.834] Value: [15:31:39.834] Conditions captured: [15:31:39.834] Early signaling: FALSE [15:31:39.834] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:39.834] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:39.852] Chunk #1 of 1 ... DONE [15:31:39.852] Launching 1 futures (chunks) ... DONE [15:31:39.852] Resolving 1 futures (chunks) ... [15:31:39.853] - Number of value chunks collected: 1 [15:31:39.853] Resolving 1 futures (chunks) ... DONE [15:31:39.853] Reducing values from 1 chunks ... [15:31:39.853] - Number of values collected after concatenation: 1 [15:31:39.854] - Number of values expected: 1 [15:31:39.854] Reducing values from 1 chunks ... DONE [15:31:39.854] future_lapply() ... DONE [[1]] [1] 1 Globals set 'D' [15:31:39.855] future_lapply() ... [15:31:39.856] Number of chunks: 1 [15:31:39.856] getGlobalsAndPackagesXApply() ... [15:31:39.857] - future.globals: with names '2', '3' [15:31:39.857] - use_args: TRUE [15:31:39.857] - Getting '...' globals ... [15:31:39.858] - '...' content: [n=0] [15:31:39.859] List of 1 [15:31:39.859] $ ...: list() [15:31:39.859] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.859] - attr(*, "where")=List of 1 [15:31:39.859] ..$ ...: [15:31:39.859] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.859] - attr(*, "resolved")= logi TRUE [15:31:39.859] - attr(*, "total_size")= num NA [15:31:39.864] - Getting '...' globals ... DONE [15:31:39.864] Globals to be used in all futures (chunks): [n=4] 'a', 'b', '...future.FUN', '...' [15:31:39.864] List of 4 [15:31:39.864] $ a : num 2 [15:31:39.864] $ b : num 3 [15:31:39.864] $ ...future.FUN:function (x) [15:31:39.864] $ ... : list() [15:31:39.864] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.864] - attr(*, "where")=List of 4 [15:31:39.864] ..$ a : [15:31:39.864] ..$ b : [15:31:39.864] ..$ ...future.FUN: [15:31:39.864] ..$ ... : [15:31:39.864] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.864] - attr(*, "resolved")= logi FALSE [15:31:39.864] - attr(*, "total_size")= num NA [15:31:39.872] Packages to be attached in all futures: [n=1] 'utils' [15:31:39.872] getGlobalsAndPackagesXApply() ... DONE [15:31:39.873] Number of futures (= number of chunks): 1 [15:31:39.873] Launching 1 futures (chunks) ... [15:31:39.873] Chunk #1 of 1 ... [15:31:39.874] - seeds: [15:31:39.874] - All globals exported: [n=7] 'a', 'b', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:39.888] Created future: [15:31:39.889] ClusterFuture: [15:31:39.889] Label: 'future_lapply-1' [15:31:39.889] Expression: [15:31:39.889] { [15:31:39.889] do.call(function(...) { [15:31:39.889] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:39.889] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:39.889] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:39.889] on.exit(options(oopts), add = TRUE) [15:31:39.889] } [15:31:39.889] { [15:31:39.889] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:39.889] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:39.889] ...future.FUN(...future.X_jj, ...) [15:31:39.889] }) [15:31:39.889] } [15:31:39.889] }, args = future.call.arguments) [15:31:39.889] } [15:31:39.889] Lazy evaluation: FALSE [15:31:39.889] Asynchronous evaluation: TRUE [15:31:39.889] Local evaluation: TRUE [15:31:39.889] Environment: R_GlobalEnv [15:31:39.889] Capture standard output: TRUE [15:31:39.889] Capture condition classes: 'condition' (excluding 'nothing') [15:31:39.889] 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, ...) [15:31:39.889] Packages: 1 packages ('utils') [15:31:39.889] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:39.889] Resolved: TRUE [15:31:39.889] Value: [15:31:39.889] Conditions captured: [15:31:39.889] Early signaling: FALSE [15:31:39.889] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:39.889] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:39.919] Chunk #1 of 1 ... DONE [15:31:39.919] Launching 1 futures (chunks) ... DONE [15:31:39.920] Resolving 1 futures (chunks) ... [15:31:39.921] - Number of value chunks collected: 1 [15:31:39.921] Resolving 1 futures (chunks) ... DONE [15:31:39.921] Reducing values from 1 chunks ... [15:31:39.921] - Number of values collected after concatenation: 1 [15:31:39.922] - Number of values expected: 1 [15:31:39.922] Reducing values from 1 chunks ... DONE [15:31:39.922] 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")) [15:31:39.923] future_lapply() ... [15:31:39.924] Number of chunks: 1 [15:31:39.925] getGlobalsAndPackagesXApply() ... [15:31:39.925] - future.globals: FALSE [15:31:39.927] - globals found/used: [n=3] 'd', 'FUN', 'future.call.arguments' [15:31:39.927] - needed namespaces: [n=0] [15:31:39.927] Finding globals ... DONE [15:31:39.927] - use_args: TRUE [15:31:39.928] - Getting '...' globals ... [15:31:39.928] - '...' content: [n=0] [15:31:39.929] List of 1 [15:31:39.929] $ ...: list() [15:31:39.929] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.929] - attr(*, "where")=List of 1 [15:31:39.929] ..$ ...: [15:31:39.929] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.929] - attr(*, "resolved")= logi TRUE [15:31:39.929] - attr(*, "total_size")= num NA [15:31:39.933] - Getting '...' globals ... DONE [15:31:39.933] Globals to be used in all futures (chunks): [n=4] 'd', '...future.FUN', 'future.call.arguments', '...' [15:31:39.934] List of 4 [15:31:39.934] $ d : num 42 [15:31:39.934] $ ...future.FUN :function (x) [15:31:39.934] $ future.call.arguments: list() [15:31:39.934] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.934] $ ... : list() [15:31:39.934] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:39.934] - attr(*, "where")=List of 4 [15:31:39.934] ..$ d : [15:31:39.934] ..$ ...future.FUN : [15:31:39.934] ..$ future.call.arguments: [15:31:39.934] ..$ ... : [15:31:39.934] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:39.934] - attr(*, "resolved")= logi FALSE [15:31:39.934] - attr(*, "total_size")= num 784 [15:31:39.941] Packages to be attached in all futures: [n=0] [15:31:39.941] getGlobalsAndPackagesXApply() ... DONE [15:31:39.941] Number of futures (= number of chunks): 1 [15:31:39.942] Launching 1 futures (chunks) ... [15:31:39.942] Chunk #1 of 1 ... [15:31:39.942] - seeds: [15:31:39.943] - All globals exported: [n=7] 'd', '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:39.958] Created future: [15:31:39.958] ClusterFuture: [15:31:39.958] Label: 'future_lapply-1' [15:31:39.958] Expression: [15:31:39.958] { [15:31:39.958] do.call(function(...) { [15:31:39.958] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:39.958] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:39.958] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:39.958] on.exit(options(oopts), add = TRUE) [15:31:39.958] } [15:31:39.958] { [15:31:39.958] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:39.958] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:39.958] ...future.FUN(...future.X_jj, ...) [15:31:39.958] }) [15:31:39.958] } [15:31:39.958] }, args = future.call.arguments) [15:31:39.958] } [15:31:39.958] Lazy evaluation: FALSE [15:31:39.958] Asynchronous evaluation: TRUE [15:31:39.958] Local evaluation: TRUE [15:31:39.958] Environment: R_GlobalEnv [15:31:39.958] Capture standard output: TRUE [15:31:39.958] Capture condition classes: 'condition' (excluding 'nothing') [15:31:39.958] 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, ...) [15:31:39.958] Packages: [15:31:39.958] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:39.958] Resolved: TRUE [15:31:39.958] Value: [15:31:39.958] Conditions captured: [15:31:39.958] Early signaling: FALSE [15:31:39.958] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:39.958] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:39.989] Chunk #1 of 1 ... DONE [15:31:39.990] Launching 1 futures (chunks) ... DONE [15:31:39.990] Resolving 1 futures (chunks) ... [15:31:39.991] - Number of value chunks collected: 1 [15:31:39.991] Resolving 1 futures (chunks) ... DONE [15:31:39.992] Reducing values from 1 chunks ... [15:31:39.992] - Number of values collected after concatenation: 2 [15:31:39.992] - Number of values expected: 2 [15:31:39.992] Reducing values from 1 chunks ... DONE [15:31:39.993] 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) [15:31:39.993] future_lapply() ... [15:31:39.995] Number of chunks: 1 [15:31:39.995] getGlobalsAndPackagesXApply() ... [15:31:39.995] - future.globals: TRUE [15:31:39.999] - globals found/used: [n=1] 'FUN' [15:31:39.999] - needed namespaces: [n=0] [15:31:39.999] Finding globals ... DONE [15:31:40.000] - use_args: TRUE [15:31:40.000] - Getting '...' globals ... [15:31:40.001] - '...' content: [n=0] [15:31:40.001] List of 1 [15:31:40.001] $ ...: list() [15:31:40.001] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.001] - attr(*, "where")=List of 1 [15:31:40.001] ..$ ...: [15:31:40.001] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.001] - attr(*, "resolved")= logi TRUE [15:31:40.001] - attr(*, "total_size")= num NA [15:31:40.008] - Getting '...' globals ... DONE [15:31:40.008] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.009] List of 2 [15:31:40.009] $ ...future.FUN:function (x) [15:31:40.009] $ ... : list() [15:31:40.009] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.009] - attr(*, "where")=List of 2 [15:31:40.009] ..$ ...future.FUN: [15:31:40.009] ..$ ... : [15:31:40.009] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.009] - attr(*, "resolved")= logi FALSE [15:31:40.009] - attr(*, "total_size")= num 728 [15:31:40.013] Packages to be attached in all futures: [n=0] [15:31:40.014] getGlobalsAndPackagesXApply() ... DONE [15:31:40.014] Number of futures (= number of chunks): 1 [15:31:40.014] Launching 1 futures (chunks) ... [15:31:40.015] Chunk #1 of 1 ... [15:31:40.015] - Finding globals in 'X' for chunk #1 ... [15:31:40.016] + additional globals found: [n=0] [15:31:40.016] + additional namespaces needed: [n=0] [15:31:40.016] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.016] - seeds: [15:31:40.017] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.030] Created future: [15:31:40.030] ClusterFuture: [15:31:40.030] Label: 'future_lapply-1' [15:31:40.030] Expression: [15:31:40.030] { [15:31:40.030] do.call(function(...) { [15:31:40.030] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.030] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.030] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.030] on.exit(options(oopts), add = TRUE) [15:31:40.030] } [15:31:40.030] { [15:31:40.030] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.030] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.030] ...future.FUN(...future.X_jj, ...) [15:31:40.030] }) [15:31:40.030] } [15:31:40.030] }, args = future.call.arguments) [15:31:40.030] } [15:31:40.030] Lazy evaluation: FALSE [15:31:40.030] Asynchronous evaluation: TRUE [15:31:40.030] Local evaluation: TRUE [15:31:40.030] Environment: R_GlobalEnv [15:31:40.030] Capture standard output: TRUE [15:31:40.030] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.030] 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) [15:31:40.030] Packages: [15:31:40.030] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.030] Resolved: TRUE [15:31:40.030] Value: [15:31:40.030] Conditions captured: [15:31:40.030] Early signaling: FALSE [15:31:40.030] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.030] Class: 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:40.062] Chunk #1 of 1 ... DONE [15:31:40.062] Launching 1 futures (chunks) ... DONE [15:31:40.063] 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 ...) [15:31:40.158] future_lapply() ... [15:31:40.160] Number of chunks: 1 [15:31:40.160] getGlobalsAndPackagesXApply() ... [15:31:40.160] - future.globals: TRUE [15:31:40.172] - globals found/used: [n=5] 'FUN', 'caller', 'args', 'call_my_add', 'my_add' [15:31:40.172] - needed namespaces: [n=0] [15:31:40.172] Finding globals ... DONE [15:31:40.173] - use_args: TRUE [15:31:40.173] - Getting '...' globals ... [15:31:40.174] - '...' content: [n=0] [15:31:40.174] List of 1 [15:31:40.174] $ ...: list() [15:31:40.174] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.174] - attr(*, "where")=List of 1 [15:31:40.174] ..$ ...: [15:31:40.174] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.174] - attr(*, "resolved")= logi TRUE [15:31:40.174] - attr(*, "total_size")= num NA [15:31:40.180] - Getting '...' globals ... DONE [15:31:40.180] Globals to be used in all futures (chunks): [n=6] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...' [15:31:40.181] List of 6 [15:31:40.181] $ ...future.FUN:function (i) [15:31:40.181] $ caller :function (a, b, FUN = call_my_add) [15:31:40.181] $ args :List of 1 [15:31:40.181] ..$ FUN:function (a, b) [15:31:40.181] $ call_my_add :function (a, b) [15:31:40.181] $ my_add :function (a, b) [15:31:40.181] $ ... : list() [15:31:40.181] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.181] - attr(*, "where")=List of 6 [15:31:40.181] ..$ ...future.FUN: [15:31:40.181] ..$ caller : [15:31:40.181] ..$ args : [15:31:40.181] ..$ call_my_add : [15:31:40.181] ..$ my_add : [15:31:40.181] ..$ ... : [15:31:40.181] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.181] - attr(*, "resolved")= logi FALSE [15:31:40.181] - attr(*, "total_size")= num 6664 [15:31:40.191] Packages to be attached in all futures: [n=0] [15:31:40.191] getGlobalsAndPackagesXApply() ... DONE [15:31:40.192] Number of futures (= number of chunks): 1 [15:31:40.192] Launching 1 futures (chunks) ... [15:31:40.192] Chunk #1 of 1 ... [15:31:40.192] - Finding globals in 'X' for chunk #1 ... [15:31:40.193] + additional globals found: [n=0] [15:31:40.193] + additional namespaces needed: [n=0] [15:31:40.194] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.194] - seeds: [15:31:40.194] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.207] Created future: [15:31:40.207] SequentialFuture: [15:31:40.207] Label: 'future_lapply-1' [15:31:40.207] Expression: [15:31:40.207] { [15:31:40.207] do.call(function(...) { [15:31:40.207] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.207] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.207] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.207] on.exit(options(oopts), add = TRUE) [15:31:40.207] } [15:31:40.207] { [15:31:40.207] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.207] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.207] ...future.FUN(...future.X_jj, ...) [15:31:40.207] }) [15:31:40.207] } [15:31:40.207] }, args = future.call.arguments) [15:31:40.207] } [15:31:40.207] Lazy evaluation: FALSE [15:31:40.207] Asynchronous evaluation: FALSE [15:31:40.207] Local evaluation: TRUE [15:31:40.207] Environment: 0x000001e531b9aed8 [15:31:40.207] Capture standard output: TRUE [15:31:40.207] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.207] 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, ...) [15:31:40.207] Packages: [15:31:40.207] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.207] Resolved: TRUE [15:31:40.207] Value: 168 bytes of class 'list' [15:31:40.207] Early signaling: FALSE [15:31:40.207] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.207] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.210] Chunk #1 of 1 ... DONE [15:31:40.210] Launching 1 futures (chunks) ... DONE [15:31:40.210] Resolving 1 futures (chunks) ... [15:31:40.212] - Number of value chunks collected: 1 [15:31:40.212] Resolving 1 futures (chunks) ... DONE [15:31:40.212] Reducing values from 1 chunks ... [15:31:40.212] - Number of values collected after concatenation: 3 [15:31:40.212] - Number of values expected: 3 [15:31:40.213] Reducing values from 1 chunks ... DONE [15:31:40.213] future_lapply() ... DONE - future_lapply(x, FUN = do.call, ...) ... [15:31:40.213] future_lapply() ... [15:31:40.221] Number of chunks: 1 [15:31:40.221] getGlobalsAndPackagesXApply() ... [15:31:40.221] - future.globals: TRUE [15:31:40.231] - globals found/used: [n=1] 'FUN' [15:31:40.232] - needed namespaces: [n=0] [15:31:40.232] Finding globals ... DONE [15:31:40.232] - use_args: TRUE [15:31:40.232] - Getting '...' globals ... [15:31:40.233] - '...' content: [n=1] 'what' [15:31:40.234] List of 1 [15:31:40.234] $ ...:List of 1 [15:31:40.234] ..$ what:function (x) [15:31:40.234] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.234] - attr(*, "where")=List of 1 [15:31:40.234] ..$ ...: [15:31:40.234] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.234] - attr(*, "resolved")= logi TRUE [15:31:40.234] - attr(*, "total_size")= num NA [15:31:40.239] - Getting '...' globals ... DONE [15:31:40.240] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.240] List of 2 [15:31:40.240] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [15:31:40.240] $ ... :List of 1 [15:31:40.240] ..$ what:function (x) [15:31:40.240] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.240] - attr(*, "where")=List of 2 [15:31:40.240] ..$ ...future.FUN: [15:31:40.240] ..$ ... : [15:31:40.240] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.240] - attr(*, "resolved")= logi FALSE [15:31:40.240] - attr(*, "total_size")= num 12192 [15:31:40.246] Packages to be attached in all futures: [n=0] [15:31:40.246] getGlobalsAndPackagesXApply() ... DONE [15:31:40.247] Number of futures (= number of chunks): 1 [15:31:40.247] Launching 1 futures (chunks) ... [15:31:40.247] Chunk #1 of 1 ... [15:31:40.247] - Finding globals in 'X' for chunk #1 ... [15:31:40.248] + additional globals found: [n=0] [15:31:40.249] + additional namespaces needed: [n=0] [15:31:40.249] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.249] - seeds: [15:31:40.249] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.255] Created future: [15:31:40.256] SequentialFuture: [15:31:40.256] Label: 'future_lapply-1' [15:31:40.256] Expression: [15:31:40.256] { [15:31:40.256] do.call(function(...) { [15:31:40.256] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.256] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.256] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.256] on.exit(options(oopts), add = TRUE) [15:31:40.256] } [15:31:40.256] { [15:31:40.256] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.256] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.256] ...future.FUN(...future.X_jj, ...) [15:31:40.256] }) [15:31:40.256] } [15:31:40.256] }, args = future.call.arguments) [15:31:40.256] } [15:31:40.256] Lazy evaluation: FALSE [15:31:40.256] Asynchronous evaluation: FALSE [15:31:40.256] Local evaluation: TRUE [15:31:40.256] Environment: R_GlobalEnv [15:31:40.256] Capture standard output: TRUE [15:31:40.256] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.256] 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) [15:31:40.256] Packages: [15:31:40.256] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.256] Resolved: TRUE [15:31:40.256] Value: 56 bytes of class 'list' [15:31:40.256] Early signaling: FALSE [15:31:40.256] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.256] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.258] Chunk #1 of 1 ... DONE [15:31:40.258] Launching 1 futures (chunks) ... DONE [15:31:40.258] Resolving 1 futures (chunks) ... [15:31:40.259] - Number of value chunks collected: 1 [15:31:40.260] Resolving 1 futures (chunks) ... DONE [15:31:40.260] Reducing values from 1 chunks ... [15:31:40.260] - Number of values collected after concatenation: 1 [15:31:40.260] - Number of values expected: 1 [15:31:40.261] Reducing values from 1 chunks ... DONE [15:31:40.261] future_lapply() ... DONE [15:31:40.261] future_lapply() ... [15:31:40.264] Number of chunks: 1 [15:31:40.265] getGlobalsAndPackagesXApply() ... [15:31:40.265] - future.globals: TRUE [15:31:40.271] - globals found/used: [n=1] 'FUN' [15:31:40.272] - needed namespaces: [n=0] [15:31:40.272] Finding globals ... DONE [15:31:40.272] - use_args: TRUE [15:31:40.272] - Getting '...' globals ... [15:31:40.273] - '...' content: [n=1] 'what' [15:31:40.273] List of 1 [15:31:40.273] $ ...:List of 1 [15:31:40.273] ..$ what:function (...) [15:31:40.273] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.273] - attr(*, "where")=List of 1 [15:31:40.273] ..$ ...: [15:31:40.273] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.273] - attr(*, "resolved")= logi TRUE [15:31:40.273] - attr(*, "total_size")= num NA [15:31:40.279] - Getting '...' globals ... DONE [15:31:40.279] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.280] List of 2 [15:31:40.280] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [15:31:40.280] $ ... :List of 1 [15:31:40.280] ..$ what:function (...) [15:31:40.280] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.280] - attr(*, "where")=List of 2 [15:31:40.280] ..$ ...future.FUN: [15:31:40.280] ..$ ... : [15:31:40.280] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.280] - attr(*, "resolved")= logi FALSE [15:31:40.280] - attr(*, "total_size")= num 12584 [15:31:40.286] Packages to be attached in all futures: [n=0] [15:31:40.286] getGlobalsAndPackagesXApply() ... DONE [15:31:40.286] Number of futures (= number of chunks): 1 [15:31:40.287] Launching 1 futures (chunks) ... [15:31:40.287] Chunk #1 of 1 ... [15:31:40.287] - Finding globals in 'X' for chunk #1 ... [15:31:40.288] + additional globals found: [n=0] [15:31:40.288] + additional namespaces needed: [n=0] [15:31:40.289] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.289] - seeds: [15:31:40.289] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.297] Created future: [15:31:40.297] SequentialFuture: [15:31:40.297] Label: 'future_lapply-1' [15:31:40.297] Expression: [15:31:40.297] { [15:31:40.297] do.call(function(...) { [15:31:40.297] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.297] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.297] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.297] on.exit(options(oopts), add = TRUE) [15:31:40.297] } [15:31:40.297] { [15:31:40.297] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.297] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.297] ...future.FUN(...future.X_jj, ...) [15:31:40.297] }) [15:31:40.297] } [15:31:40.297] }, args = future.call.arguments) [15:31:40.297] } [15:31:40.297] Lazy evaluation: FALSE [15:31:40.297] Asynchronous evaluation: FALSE [15:31:40.297] Local evaluation: TRUE [15:31:40.297] Environment: R_GlobalEnv [15:31:40.297] Capture standard output: TRUE [15:31:40.297] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.297] 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) [15:31:40.297] Packages: [15:31:40.297] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.297] Resolved: TRUE [15:31:40.297] Value: 56 bytes of class 'list' [15:31:40.297] Early signaling: FALSE [15:31:40.297] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.297] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.299] Chunk #1 of 1 ... DONE [15:31:40.300] Launching 1 futures (chunks) ... DONE [15:31:40.300] Resolving 1 futures (chunks) ... [15:31:40.301] - Number of value chunks collected: 1 [15:31:40.301] Resolving 1 futures (chunks) ... DONE [15:31:40.301] Reducing values from 1 chunks ... [15:31:40.302] - Number of values collected after concatenation: 1 [15:31:40.302] - Number of values expected: 1 [15:31:40.302] Reducing values from 1 chunks ... DONE [15:31:40.303] future_lapply() ... DONE - future_lapply(x, ...) - passing arguments via '...' ... [15:31:40.303] future_lapply() ... [15:31:40.305] Number of chunks: 1 [15:31:40.305] getGlobalsAndPackagesXApply() ... [15:31:40.305] - future.globals: TRUE [15:31:40.309] - globals found/used: [n=1] 'FUN' [15:31:40.309] - needed namespaces: [n=0] [15:31:40.309] Finding globals ... DONE [15:31:40.310] - use_args: TRUE [15:31:40.310] - Getting '...' globals ... [15:31:40.311] - '...' content: [n=1] 'b' [15:31:40.311] List of 1 [15:31:40.311] $ ...:List of 1 [15:31:40.311] ..$ b:'data.frame': 2 obs. of 1 variable: [15:31:40.311] .. ..$ a: int [1:2] 1 2 [15:31:40.311] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.311] - attr(*, "where")=List of 1 [15:31:40.311] ..$ ...: [15:31:40.311] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.311] - attr(*, "resolved")= logi TRUE [15:31:40.311] - attr(*, "total_size")= num NA [15:31:40.317] - Getting '...' globals ... DONE [15:31:40.318] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.318] List of 2 [15:31:40.318] $ ...future.FUN:function (a, b) [15:31:40.318] $ ... :List of 1 [15:31:40.318] ..$ b:'data.frame': 2 obs. of 1 variable: [15:31:40.318] .. ..$ a: int [1:2] 1 2 [15:31:40.318] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.318] - attr(*, "where")=List of 2 [15:31:40.318] ..$ ...future.FUN: [15:31:40.318] ..$ ... : [15:31:40.318] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.318] - attr(*, "resolved")= logi FALSE [15:31:40.318] - attr(*, "total_size")= num 1440 [15:31:40.324] Packages to be attached in all futures: [n=0] [15:31:40.324] getGlobalsAndPackagesXApply() ... DONE [15:31:40.325] Number of futures (= number of chunks): 1 [15:31:40.325] Launching 1 futures (chunks) ... [15:31:40.325] Chunk #1 of 1 ... [15:31:40.326] - Finding globals in 'X' for chunk #1 ... [15:31:40.326] + additional globals found: [n=0] [15:31:40.327] + additional namespaces needed: [n=0] [15:31:40.327] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.327] - seeds: [15:31:40.327] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.333] Created future: [15:31:40.333] SequentialFuture: [15:31:40.333] Label: 'future_lapply-1' [15:31:40.333] Expression: [15:31:40.333] { [15:31:40.333] do.call(function(...) { [15:31:40.333] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.333] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.333] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.333] on.exit(options(oopts), add = TRUE) [15:31:40.333] } [15:31:40.333] { [15:31:40.333] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.333] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.333] ...future.FUN(...future.X_jj, ...) [15:31:40.333] }) [15:31:40.333] } [15:31:40.333] }, args = future.call.arguments) [15:31:40.333] } [15:31:40.333] Lazy evaluation: FALSE [15:31:40.333] Asynchronous evaluation: FALSE [15:31:40.333] Local evaluation: TRUE [15:31:40.333] Environment: R_GlobalEnv [15:31:40.333] Capture standard output: TRUE [15:31:40.333] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.333] 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) [15:31:40.333] Packages: [15:31:40.333] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.333] Resolved: TRUE [15:31:40.333] Value: 112 bytes of class 'list' [15:31:40.333] Early signaling: FALSE [15:31:40.333] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.333] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.335] Chunk #1 of 1 ... DONE [15:31:40.336] Launching 1 futures (chunks) ... DONE [15:31:40.336] Resolving 1 futures (chunks) ... [15:31:40.341] - Number of value chunks collected: 1 [15:31:40.342] Resolving 1 futures (chunks) ... DONE [15:31:40.342] Reducing values from 1 chunks ... [15:31:40.342] - Number of values collected after concatenation: 1 [15:31:40.342] - Number of values expected: 1 [15:31:40.343] Reducing values from 1 chunks ... DONE [15:31:40.343] future_lapply() ... DONE [15:31:40.343] future_lapply() ... [15:31:40.344] Number of chunks: 1 [15:31:40.345] getGlobalsAndPackagesXApply() ... [15:31:40.345] - future.globals: TRUE [15:31:40.348] - globals found/used: [n=1] 'FUN' [15:31:40.349] - needed namespaces: [n=0] [15:31:40.349] Finding globals ... DONE [15:31:40.349] - use_args: TRUE [15:31:40.349] - Getting '...' globals ... [15:31:40.350] - '...' content: [n=1] 'b' [15:31:40.350] List of 1 [15:31:40.350] $ ...:List of 1 [15:31:40.350] ..$ b: [15:31:40.350] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.350] - attr(*, "where")=List of 1 [15:31:40.350] ..$ ...: [15:31:40.350] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.350] - attr(*, "resolved")= logi TRUE [15:31:40.350] - attr(*, "total_size")= num NA [15:31:40.356] - Getting '...' globals ... DONE [15:31:40.356] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.356] List of 2 [15:31:40.356] $ ...future.FUN:function (a, b) [15:31:40.356] $ ... :List of 1 [15:31:40.356] ..$ b: [15:31:40.356] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.356] - attr(*, "where")=List of 2 [15:31:40.356] ..$ ...future.FUN: [15:31:40.356] ..$ ... : [15:31:40.356] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.356] - attr(*, "resolved")= logi FALSE [15:31:40.356] - attr(*, "total_size")= num 1440 [15:31:40.362] Packages to be attached in all futures: [n=0] [15:31:40.362] getGlobalsAndPackagesXApply() ... DONE [15:31:40.363] Number of futures (= number of chunks): 1 [15:31:40.363] Launching 1 futures (chunks) ... [15:31:40.363] Chunk #1 of 1 ... [15:31:40.363] - Finding globals in 'X' for chunk #1 ... [15:31:40.364] + additional globals found: [n=0] [15:31:40.364] + additional namespaces needed: [n=0] [15:31:40.365] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.365] - seeds: [15:31:40.365] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.370] Created future: [15:31:40.371] SequentialFuture: [15:31:40.371] Label: 'future_lapply-1' [15:31:40.371] Expression: [15:31:40.371] { [15:31:40.371] do.call(function(...) { [15:31:40.371] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.371] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.371] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.371] on.exit(options(oopts), add = TRUE) [15:31:40.371] } [15:31:40.371] { [15:31:40.371] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.371] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.371] ...future.FUN(...future.X_jj, ...) [15:31:40.371] }) [15:31:40.371] } [15:31:40.371] }, args = future.call.arguments) [15:31:40.371] } [15:31:40.371] Lazy evaluation: FALSE [15:31:40.371] Asynchronous evaluation: FALSE [15:31:40.371] Local evaluation: TRUE [15:31:40.371] Environment: R_GlobalEnv [15:31:40.371] Capture standard output: TRUE [15:31:40.371] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.371] 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) [15:31:40.371] Packages: [15:31:40.371] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.371] Resolved: TRUE [15:31:40.371] Value: 120 bytes of class 'list' [15:31:40.371] Early signaling: FALSE [15:31:40.371] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.371] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.373] Chunk #1 of 1 ... DONE [15:31:40.373] Launching 1 futures (chunks) ... DONE [15:31:40.373] Resolving 1 futures (chunks) ... [15:31:40.374] - Number of value chunks collected: 1 [15:31:40.375] Resolving 1 futures (chunks) ... DONE [15:31:40.375] Reducing values from 1 chunks ... [15:31:40.375] - Number of values collected after concatenation: 1 [15:31:40.375] - Number of values expected: 1 [15:31:40.376] Reducing values from 1 chunks ... DONE [15:31:40.376] future_lapply() ... DONE [15:31:40.376] future_lapply() ... [15:31:40.377] Number of chunks: 1 [15:31:40.378] getGlobalsAndPackagesXApply() ... [15:31:40.378] - future.globals: TRUE [15:31:40.383] - globals found/used: [n=1] 'FUN' [15:31:40.383] - needed namespaces: [n=0] [15:31:40.383] Finding globals ... DONE [15:31:40.383] - use_args: TRUE [15:31:40.384] - Getting '...' globals ... [15:31:40.385] - '...' content: [n=1] 'b' [15:31:40.385] List of 1 [15:31:40.385] $ ...:List of 1 [15:31:40.385] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [15:31:40.385] .. .. ..@ slots :List of 4 [15:31:40.385] .. .. .. ..$ .Data : chr "function" [15:31:40.385] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. ..$ target : chr "signature" [15:31:40.385] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. ..$ defined: chr "signature" [15:31:40.385] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. ..$ generic: chr "character" [15:31:40.385] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. ..@ contains :List of 3 [15:31:40.385] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "function" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr "function" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 2 [15:31:40.385] .. .. ..@ virtual : logi FALSE [15:31:40.385] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [15:31:40.385] list() [15:31:40.385] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [15:31:40.385] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:40.385] .. .. .. .. .. .. ..@ names : chr(0) [15:31:40.385] .. .. .. .. .. .. ..@ package: chr(0) [15:31:40.385] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [15:31:40.385] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:40.385] .. .. .. .. .. .. ..@ names : chr(0) [15:31:40.385] .. .. .. .. .. .. ..@ package: chr(0) [15:31:40.385] .. .. .. .. ..$ generic: chr(0) [15:31:40.385] .. .. ..@ validity : NULL [15:31:40.385] .. .. ..@ access : list() [15:31:40.385] .. .. ..@ className : chr "MethodDefinition" [15:31:40.385] .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. ..@ package : chr "methods" [15:31:40.385] .. .. ..@ subclasses:List of 7 [15:31:40.385] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr(0) [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 1 [15:31:40.385] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 2 [15:31:40.385] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr "MethodWithNext" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 2 [15:31:40.385] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.385] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.385] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.385] .. .. .. .. .. ..@ test :function (object) [15:31:40.385] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.385] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.385] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:40.385] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.385] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.385] .. .. .. .. .. ..@ distance : num 2 [15:31:40.385] .. .. ..@ versionKey: [15:31:40.385] .. .. ..@ sealed : logi TRUE [15:31:40.385] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.385] - attr(*, "where")=List of 1 [15:31:40.385] ..$ ...: [15:31:40.385] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.385] - attr(*, "resolved")= logi TRUE [15:31:40.385] - attr(*, "total_size")= num NA [15:31:40.473] - Getting '...' globals ... DONE [15:31:40.473] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.473] List of 2 [15:31:40.473] $ ...future.FUN:function (a, b) [15:31:40.473] $ ... :List of 1 [15:31:40.473] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [15:31:40.473] .. .. ..@ slots :List of 4 [15:31:40.473] .. .. .. ..$ .Data : chr "function" [15:31:40.473] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. ..$ target : chr "signature" [15:31:40.473] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. ..$ defined: chr "signature" [15:31:40.473] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. ..$ generic: chr "character" [15:31:40.473] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. ..@ contains :List of 3 [15:31:40.473] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "function" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr "function" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 2 [15:31:40.473] .. .. ..@ virtual : logi FALSE [15:31:40.473] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [15:31:40.473] list() [15:31:40.473] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [15:31:40.473] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:40.473] .. .. .. .. .. .. ..@ names : chr(0) [15:31:40.473] .. .. .. .. .. .. ..@ package: chr(0) [15:31:40.473] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [15:31:40.473] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:40.473] .. .. .. .. .. .. ..@ names : chr(0) [15:31:40.473] .. .. .. .. .. .. ..@ package: chr(0) [15:31:40.473] .. .. .. .. ..$ generic: chr(0) [15:31:40.473] .. .. ..@ validity : NULL [15:31:40.473] .. .. ..@ access : list() [15:31:40.473] .. .. ..@ className : chr "MethodDefinition" [15:31:40.473] .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. ..@ package : chr "methods" [15:31:40.473] .. .. ..@ subclasses:List of 7 [15:31:40.473] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr(0) [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 1 [15:31:40.473] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 2 [15:31:40.473] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr "MethodWithNext" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 2 [15:31:40.473] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:40.473] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ package : chr "methods" [15:31:40.473] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:40.473] .. .. .. .. .. ..@ test :function (object) [15:31:40.473] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:40.473] .. .. .. .. .. ..@ simple : logi TRUE [15:31:40.473] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:40.473] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:40.473] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:40.473] .. .. .. .. .. ..@ distance : num 2 [15:31:40.473] .. .. ..@ versionKey: [15:31:40.473] .. .. ..@ sealed : logi TRUE [15:31:40.473] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.473] - attr(*, "where")=List of 2 [15:31:40.473] ..$ ...future.FUN: [15:31:40.473] ..$ ... : [15:31:40.473] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.473] - attr(*, "resolved")= logi FALSE [15:31:40.473] - attr(*, "total_size")= num 405168 [15:31:40.574] Packages to be attached in all futures: [n=0] [15:31:40.575] getGlobalsAndPackagesXApply() ... DONE [15:31:40.575] Number of futures (= number of chunks): 1 [15:31:40.576] Launching 1 futures (chunks) ... [15:31:40.576] Chunk #1 of 1 ... [15:31:40.577] - Finding globals in 'X' for chunk #1 ... [15:31:40.577] + additional globals found: [n=0] [15:31:40.578] + additional namespaces needed: [n=0] [15:31:40.578] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.578] - seeds: [15:31:40.578] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.585] Created future: [15:31:40.585] SequentialFuture: [15:31:40.585] Label: 'future_lapply-1' [15:31:40.585] Expression: [15:31:40.585] { [15:31:40.585] do.call(function(...) { [15:31:40.585] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.585] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.585] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.585] on.exit(options(oopts), add = TRUE) [15:31:40.585] } [15:31:40.585] { [15:31:40.585] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.585] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.585] ...future.FUN(...future.X_jj, ...) [15:31:40.585] }) [15:31:40.585] } [15:31:40.585] }, args = future.call.arguments) [15:31:40.585] } [15:31:40.585] Lazy evaluation: FALSE [15:31:40.585] Asynchronous evaluation: FALSE [15:31:40.585] Local evaluation: TRUE [15:31:40.585] Environment: R_GlobalEnv [15:31:40.585] Capture standard output: TRUE [15:31:40.585] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.585] 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) [15:31:40.585] Packages: [15:31:40.585] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.585] Resolved: TRUE [15:31:40.585] Value: 112 bytes of class 'list' [15:31:40.585] Early signaling: FALSE [15:31:40.585] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.585] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.588] Chunk #1 of 1 ... DONE [15:31:40.588] Launching 1 futures (chunks) ... DONE [15:31:40.588] Resolving 1 futures (chunks) ... [15:31:40.589] - Number of value chunks collected: 1 [15:31:40.590] Resolving 1 futures (chunks) ... DONE [15:31:40.590] Reducing values from 1 chunks ... [15:31:40.590] - Number of values collected after concatenation: 1 [15:31:40.590] - Number of values expected: 1 [15:31:40.591] Reducing values from 1 chunks ... DONE [15:31:40.591] future_lapply() ... DONE - future_lapply(X, ...) - 'X' containing globals ... List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 [15:31:40.595] future_lapply() ... [15:31:40.596] Number of chunks: 1 [15:31:40.596] getGlobalsAndPackagesXApply() ... [15:31:40.597] - future.globals: TRUE [15:31:40.600] - globals found/used: [n=1] 'FUN' [15:31:40.600] - needed namespaces: [n=0] [15:31:40.600] Finding globals ... DONE [15:31:40.601] - use_args: TRUE [15:31:40.601] - Getting '...' globals ... [15:31:40.602] - '...' content: [n=0] [15:31:40.602] List of 1 [15:31:40.602] $ ...: list() [15:31:40.602] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.602] - attr(*, "where")=List of 1 [15:31:40.602] ..$ ...: [15:31:40.602] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.602] - attr(*, "resolved")= logi TRUE [15:31:40.602] - attr(*, "total_size")= num NA [15:31:40.607] - Getting '...' globals ... DONE [15:31:40.607] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:40.608] List of 2 [15:31:40.608] $ ...future.FUN:function (f) [15:31:40.608] $ ... : list() [15:31:40.608] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.608] - attr(*, "where")=List of 2 [15:31:40.608] ..$ ...future.FUN: [15:31:40.608] ..$ ... : [15:31:40.608] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.608] - attr(*, "resolved")= logi FALSE [15:31:40.608] - attr(*, "total_size")= num 1008 [15:31:40.613] Packages to be attached in all futures: [n=0] [15:31:40.613] getGlobalsAndPackagesXApply() ... DONE [15:31:40.614] Number of futures (= number of chunks): 1 [15:31:40.614] Launching 1 futures (chunks) ... [15:31:40.614] Chunk #1 of 1 ... [15:31:40.615] - Finding globals in 'X' for chunk #1 ... [15:31:40.620] + additional globals found: [n=2] 'a', 'b' [15:31:40.620] + additional namespaces needed: [n=1] 'tools' [15:31:40.620] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.621] - seeds: [15:31:40.621] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [15:31:40.633] Created future: [15:31:40.634] SequentialFuture: [15:31:40.634] Label: 'future_lapply-1' [15:31:40.634] Expression: [15:31:40.634] { [15:31:40.634] do.call(function(...) { [15:31:40.634] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.634] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.634] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.634] on.exit(options(oopts), add = TRUE) [15:31:40.634] } [15:31:40.634] { [15:31:40.634] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.634] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.634] ...future.FUN(...future.X_jj, ...) [15:31:40.634] }) [15:31:40.634] } [15:31:40.634] }, args = future.call.arguments) [15:31:40.634] } [15:31:40.634] Lazy evaluation: FALSE [15:31:40.634] Asynchronous evaluation: FALSE [15:31:40.634] Local evaluation: TRUE [15:31:40.634] Environment: R_GlobalEnv [15:31:40.634] Capture standard output: TRUE [15:31:40.634] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.634] 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, ...) [15:31:40.634] Packages: 1 packages ('tools') [15:31:40.634] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.634] Resolved: TRUE [15:31:40.634] Value: 224 bytes of class 'list' [15:31:40.634] Early signaling: FALSE [15:31:40.634] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.634] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.636] Chunk #1 of 1 ... DONE [15:31:40.636] Launching 1 futures (chunks) ... DONE [15:31:40.637] Resolving 1 futures (chunks) ... [15:31:40.638] - Number of value chunks collected: 1 [15:31:40.638] Resolving 1 futures (chunks) ... DONE [15:31:40.638] Reducing values from 1 chunks ... [15:31:40.639] - Number of values collected after concatenation: 4 [15:31:40.639] - Number of values expected: 4 [15:31:40.639] Reducing values from 1 chunks ... DONE [15:31:40.639] 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 [15:31:40.644] future_lapply() ... [15:31:40.646] Number of chunks: 1 [15:31:40.647] getGlobalsAndPackagesXApply() ... [15:31:40.647] - future.globals: TRUE [15:31:40.651] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [15:31:40.652] - needed namespaces: [n=0] [15:31:40.652] Finding globals ... DONE [15:31:40.652] - use_args: TRUE [15:31:40.652] - Getting '...' globals ... [15:31:40.653] - '...' content: [n=0] [15:31:40.653] List of 1 [15:31:40.653] $ ...: list() [15:31:40.653] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.653] - attr(*, "where")=List of 1 [15:31:40.653] ..$ ...: [15:31:40.653] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.653] - attr(*, "resolved")= logi TRUE [15:31:40.653] - attr(*, "total_size")= num NA [15:31:40.657] - Getting '...' globals ... DONE [15:31:40.657] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [15:31:40.657] List of 3 [15:31:40.657] $ ...future.FUN :function (x) [15:31:40.657] $ future.call.arguments:List of 1 [15:31:40.657] ..$ a: num 1 [15:31:40.657] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.657] $ ... : list() [15:31:40.657] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.657] - attr(*, "where")=List of 3 [15:31:40.657] ..$ ...future.FUN : [15:31:40.657] ..$ future.call.arguments: [15:31:40.657] ..$ ... : [15:31:40.657] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.657] - attr(*, "resolved")= logi FALSE [15:31:40.657] - attr(*, "total_size")= num 1272 [15:31:40.662] Packages to be attached in all futures: [n=0] [15:31:40.662] getGlobalsAndPackagesXApply() ... DONE [15:31:40.663] Number of futures (= number of chunks): 1 [15:31:40.663] Launching 1 futures (chunks) ... [15:31:40.663] Chunk #1 of 1 ... [15:31:40.663] - Finding globals in 'X' for chunk #1 ... [15:31:40.664] + additional globals found: [n=0] [15:31:40.664] + additional namespaces needed: [n=0] [15:31:40.664] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.664] - seeds: [15:31:40.664] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.668] Created future: [15:31:40.669] SequentialFuture: [15:31:40.669] Label: 'future_lapply-1' [15:31:40.669] Expression: [15:31:40.669] { [15:31:40.669] do.call(function(...) { [15:31:40.669] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.669] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.669] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.669] on.exit(options(oopts), add = TRUE) [15:31:40.669] } [15:31:40.669] { [15:31:40.669] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.669] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.669] ...future.FUN(...future.X_jj) [15:31:40.669] }) [15:31:40.669] } [15:31:40.669] }, args = future.call.arguments) [15:31:40.669] } [15:31:40.669] Lazy evaluation: FALSE [15:31:40.669] Asynchronous evaluation: FALSE [15:31:40.669] Local evaluation: TRUE [15:31:40.669] Environment: 0x000001e530f690d8 [15:31:40.669] Capture standard output: TRUE [15:31:40.669] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.669] 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) [15:31:40.669] Packages: [15:31:40.669] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.669] Resolved: TRUE [15:31:40.669] Value: 56 bytes of class 'list' [15:31:40.669] Early signaling: FALSE [15:31:40.669] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.669] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.670] Chunk #1 of 1 ... DONE [15:31:40.671] Launching 1 futures (chunks) ... DONE [15:31:40.671] Resolving 1 futures (chunks) ... [15:31:40.671] - Number of value chunks collected: 1 [15:31:40.671] Resolving 1 futures (chunks) ... DONE [15:31:40.672] Reducing values from 1 chunks ... [15:31:40.672] - Number of values collected after concatenation: 1 [15:31:40.672] - Number of values expected: 1 [15:31:40.672] Reducing values from 1 chunks ... DONE [15:31:40.672] future_lapply() ... DONE List of 1 $ z1:List of 1 ..$ :List of 1 .. ..$ a: num 1 - future_lapply(X, ...) - '{ a <- a + 1; a }' ... [15:31:40.674] future_lapply() ... [15:31:40.675] Number of chunks: 1 [15:31:40.675] getGlobalsAndPackagesXApply() ... [15:31:40.675] - future.globals: TRUE [15:31:40.678] - globals found/used: [n=2] 'FUN', 'a' [15:31:40.678] - needed namespaces: [n=0] [15:31:40.679] Finding globals ... DONE [15:31:40.679] - use_args: TRUE [15:31:40.679] - Getting '...' globals ... [15:31:40.679] - '...' content: [n=0] [15:31:40.680] List of 1 [15:31:40.680] $ ...: list() [15:31:40.680] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.680] - attr(*, "where")=List of 1 [15:31:40.680] ..$ ...: [15:31:40.680] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.680] - attr(*, "resolved")= logi TRUE [15:31:40.680] - attr(*, "total_size")= num NA [15:31:40.683] - Getting '...' globals ... DONE [15:31:40.683] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [15:31:40.683] List of 3 [15:31:40.683] $ ...future.FUN:function (ii) [15:31:40.683] $ a : num 1 [15:31:40.683] $ ... : list() [15:31:40.683] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.683] - attr(*, "where")=List of 3 [15:31:40.683] ..$ ...future.FUN: [15:31:40.683] ..$ a : [15:31:40.683] ..$ ... : [15:31:40.683] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.683] - attr(*, "resolved")= logi FALSE [15:31:40.683] - attr(*, "total_size")= num 2984 [15:31:40.687] Packages to be attached in all futures: [n=0] [15:31:40.687] getGlobalsAndPackagesXApply() ... DONE [15:31:40.688] Number of futures (= number of chunks): 1 [15:31:40.688] Launching 1 futures (chunks) ... [15:31:40.688] Chunk #1 of 1 ... [15:31:40.688] - Finding globals in 'X' for chunk #1 ... [15:31:40.689] + additional globals found: [n=0] [15:31:40.689] + additional namespaces needed: [n=0] [15:31:40.689] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.689] - seeds: [15:31:40.689] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.693] Created future: [15:31:40.693] SequentialFuture: [15:31:40.693] Label: 'future_lapply-1' [15:31:40.693] Expression: [15:31:40.693] { [15:31:40.693] do.call(function(...) { [15:31:40.693] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.693] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.693] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.693] on.exit(options(oopts), add = TRUE) [15:31:40.693] } [15:31:40.693] { [15:31:40.693] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.693] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.693] ...future.FUN(...future.X_jj, ...) [15:31:40.693] }) [15:31:40.693] } [15:31:40.693] }, args = future.call.arguments) [15:31:40.693] } [15:31:40.693] Lazy evaluation: FALSE [15:31:40.693] Asynchronous evaluation: FALSE [15:31:40.693] Local evaluation: TRUE [15:31:40.693] Environment: R_GlobalEnv [15:31:40.693] Capture standard output: TRUE [15:31:40.693] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.693] 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, ...) [15:31:40.693] Packages: [15:31:40.693] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.693] Resolved: TRUE [15:31:40.693] Value: 56 bytes of class 'list' [15:31:40.693] Early signaling: FALSE [15:31:40.693] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.693] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.695] Chunk #1 of 1 ... DONE [15:31:40.695] Launching 1 futures (chunks) ... DONE [15:31:40.695] Resolving 1 futures (chunks) ... [15:31:40.696] - Number of value chunks collected: 1 [15:31:40.696] Resolving 1 futures (chunks) ... DONE [15:31:40.696] Reducing values from 1 chunks ... [15:31:40.696] - Number of values collected after concatenation: 1 [15:31:40.696] - Number of values expected: 1 [15:31:40.697] Reducing values from 1 chunks ... DONE [15:31:40.697] future_lapply() ... DONE - future_lapply(X, ...) - '{ a; a <- a + 1 }' ... [15:31:40.697] future_lapply() ... [15:31:40.698] Number of chunks: 1 [15:31:40.698] getGlobalsAndPackagesXApply() ... [15:31:40.699] - future.globals: TRUE [15:31:40.701] - globals found/used: [n=2] 'FUN', 'a' [15:31:40.702] - needed namespaces: [n=0] [15:31:40.702] Finding globals ... DONE [15:31:40.702] - use_args: TRUE [15:31:40.702] - Getting '...' globals ... [15:31:40.703] - '...' content: [n=0] [15:31:40.703] List of 1 [15:31:40.703] $ ...: list() [15:31:40.703] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.703] - attr(*, "where")=List of 1 [15:31:40.703] ..$ ...: [15:31:40.703] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.703] - attr(*, "resolved")= logi TRUE [15:31:40.703] - attr(*, "total_size")= num NA [15:31:40.707] - Getting '...' globals ... DONE [15:31:40.707] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [15:31:40.707] List of 3 [15:31:40.707] $ ...future.FUN:function (ii) [15:31:40.707] $ a : num 1 [15:31:40.707] $ ... : list() [15:31:40.707] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.707] - attr(*, "where")=List of 3 [15:31:40.707] ..$ ...future.FUN: [15:31:40.707] ..$ a : [15:31:40.707] ..$ ... : [15:31:40.707] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.707] - attr(*, "resolved")= logi FALSE [15:31:40.707] - attr(*, "total_size")= num 2984 [15:31:40.714] Packages to be attached in all futures: [n=0] [15:31:40.714] getGlobalsAndPackagesXApply() ... DONE [15:31:40.715] Number of futures (= number of chunks): 1 [15:31:40.715] Launching 1 futures (chunks) ... [15:31:40.715] Chunk #1 of 1 ... [15:31:40.715] - Finding globals in 'X' for chunk #1 ... [15:31:40.716] + additional globals found: [n=0] [15:31:40.716] + additional namespaces needed: [n=0] [15:31:40.716] - Finding globals in 'X' for chunk #1 ... DONE [15:31:40.716] - seeds: [15:31:40.716] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.721] Created future: [15:31:40.722] SequentialFuture: [15:31:40.722] Label: 'future_lapply-1' [15:31:40.722] Expression: [15:31:40.722] { [15:31:40.722] do.call(function(...) { [15:31:40.722] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.722] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.722] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.722] on.exit(options(oopts), add = TRUE) [15:31:40.722] } [15:31:40.722] { [15:31:40.722] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.722] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.722] ...future.FUN(...future.X_jj, ...) [15:31:40.722] }) [15:31:40.722] } [15:31:40.722] }, args = future.call.arguments) [15:31:40.722] } [15:31:40.722] Lazy evaluation: FALSE [15:31:40.722] Asynchronous evaluation: FALSE [15:31:40.722] Local evaluation: TRUE [15:31:40.722] Environment: R_GlobalEnv [15:31:40.722] Capture standard output: TRUE [15:31:40.722] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.722] 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, ...) [15:31:40.722] Packages: [15:31:40.722] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.722] Resolved: TRUE [15:31:40.722] Value: 56 bytes of class 'list' [15:31:40.722] Early signaling: FALSE [15:31:40.722] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.722] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.724] Chunk #1 of 1 ... DONE [15:31:40.724] Launching 1 futures (chunks) ... DONE [15:31:40.724] Resolving 1 futures (chunks) ... [15:31:40.725] - Number of value chunks collected: 1 [15:31:40.725] Resolving 1 futures (chunks) ... DONE [15:31:40.726] Reducing values from 1 chunks ... [15:31:40.726] - Number of values collected after concatenation: 1 [15:31:40.726] - Number of values expected: 1 [15:31:40.726] Reducing values from 1 chunks ... DONE [15:31:40.727] future_lapply() ... DONE - future_lapply(..., future.globals = ) ... [15:31:40.727] future_lapply() ... [15:31:40.728] Number of chunks: 1 [15:31:40.728] getGlobalsAndPackagesXApply() ... [15:31:40.729] - future.globals: with names '42' [15:31:40.729] - use_args: TRUE [15:31:40.729] - Getting '...' globals ... [15:31:40.730] - '...' content: [n=0] [15:31:40.730] List of 1 [15:31:40.730] $ ...: list() [15:31:40.730] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.730] - attr(*, "where")=List of 1 [15:31:40.730] ..$ ...: [15:31:40.730] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.730] - attr(*, "resolved")= logi TRUE [15:31:40.730] - attr(*, "total_size")= num NA [15:31:40.735] - Getting '...' globals ... DONE [15:31:40.735] Globals to be used in all futures (chunks): [n=3] 'a', '...future.FUN', '...' [15:31:40.736] List of 3 [15:31:40.736] $ a : num 42 [15:31:40.736] $ ...future.FUN:function (x) [15:31:40.736] $ ... : list() [15:31:40.736] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:40.736] - attr(*, "where")=List of 3 [15:31:40.736] ..$ a : [15:31:40.736] ..$ ...future.FUN: [15:31:40.736] ..$ ... : [15:31:40.736] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:40.736] - attr(*, "resolved")= logi FALSE [15:31:40.736] - attr(*, "total_size")= num NA [15:31:40.742] Packages to be attached in all futures: [n=0] [15:31:40.742] getGlobalsAndPackagesXApply() ... DONE [15:31:40.742] Number of futures (= number of chunks): 1 [15:31:40.742] Launching 1 futures (chunks) ... [15:31:40.743] Chunk #1 of 1 ... [15:31:40.743] - seeds: [15:31:40.743] - All globals exported: [n=6] 'a', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:40.749] Created future: [15:31:40.749] SequentialFuture: [15:31:40.749] Label: 'future_lapply-1' [15:31:40.749] Expression: [15:31:40.749] { [15:31:40.749] do.call(function(...) { [15:31:40.749] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:40.749] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:40.749] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:40.749] on.exit(options(oopts), add = TRUE) [15:31:40.749] } [15:31:40.749] { [15:31:40.749] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:40.749] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:40.749] ...future.FUN(...future.X_jj, ...) [15:31:40.749] }) [15:31:40.749] } [15:31:40.749] }, args = future.call.arguments) [15:31:40.749] } [15:31:40.749] Lazy evaluation: FALSE [15:31:40.749] Asynchronous evaluation: FALSE [15:31:40.749] Local evaluation: TRUE [15:31:40.749] Environment: R_GlobalEnv [15:31:40.749] Capture standard output: TRUE [15:31:40.749] Capture condition classes: 'condition' (excluding 'nothing') [15:31:40.749] 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, ...) [15:31:40.749] Packages: [15:31:40.749] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:40.749] Resolved: TRUE [15:31:40.749] Value: 56 bytes of class 'list' [15:31:40.749] Early signaling: FALSE [15:31:40.749] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:40.749] Class: 'SequentialFuture', 'UniprocessFuture', 'Future', 'environment' [15:31:40.751] Chunk #1 of 1 ... DONE [15:31:40.752] Launching 1 futures (chunks) ... DONE [15:31:40.752] Resolving 1 futures (chunks) ... [15:31:40.753] - Number of value chunks collected: 1 [15:31:40.753] Resolving 1 futures (chunks) ... DONE [15:31:40.753] Reducing values from 1 chunks ... [15:31:40.753] - Number of values collected after concatenation: 1 [15:31:40.754] - Number of values expected: 1 [15:31:40.754] Reducing values from 1 chunks ... DONE [15:31:40.754] future_lapply() ... DONE List of 1 $ : num 42 [15:31:41.257] future_lapply() ... [15:31:41.264] Number of chunks: 2 [15:31:41.264] getGlobalsAndPackagesXApply() ... [15:31:41.265] - future.globals: TRUE [15:31:41.274] - globals found/used: [n=5] 'FUN', 'caller', 'args', 'call_my_add', 'my_add' [15:31:41.274] - needed namespaces: [n=0] [15:31:41.275] Finding globals ... DONE [15:31:41.275] - use_args: TRUE [15:31:41.275] - Getting '...' globals ... [15:31:41.276] - '...' content: [n=0] [15:31:41.276] List of 1 [15:31:41.276] $ ...: list() [15:31:41.276] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.276] - attr(*, "where")=List of 1 [15:31:41.276] ..$ ...: [15:31:41.276] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.276] - attr(*, "resolved")= logi TRUE [15:31:41.276] - attr(*, "total_size")= num NA [15:31:41.281] - Getting '...' globals ... DONE [15:31:41.281] Globals to be used in all futures (chunks): [n=6] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...' [15:31:41.282] List of 6 [15:31:41.282] $ ...future.FUN:function (i) [15:31:41.282] $ caller :function (a, b, FUN = call_my_add) [15:31:41.282] $ args :List of 1 [15:31:41.282] ..$ FUN:function (a, b) [15:31:41.282] $ call_my_add :function (a, b) [15:31:41.282] $ my_add :function (a, b) [15:31:41.282] $ ... : list() [15:31:41.282] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.282] - attr(*, "where")=List of 6 [15:31:41.282] ..$ ...future.FUN: [15:31:41.282] ..$ caller : [15:31:41.282] ..$ args : [15:31:41.282] ..$ call_my_add : [15:31:41.282] ..$ my_add : [15:31:41.282] ..$ ... : [15:31:41.282] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.282] - attr(*, "resolved")= logi FALSE [15:31:41.282] - attr(*, "total_size")= num 24120 [15:31:41.294] Packages to be attached in all futures: [n=0] [15:31:41.295] getGlobalsAndPackagesXApply() ... DONE [15:31:41.295] Number of futures (= number of chunks): 2 [15:31:41.296] Launching 2 futures (chunks) ... [15:31:41.296] Chunk #1 of 2 ... [15:31:41.296] - Finding globals in 'X' for chunk #1 ... [15:31:41.297] + additional globals found: [n=0] [15:31:41.297] + additional namespaces needed: [n=0] [15:31:41.298] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.298] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:41.298] - seeds: [15:31:41.299] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.325] Created future: [15:31:41.325] MultisessionFuture: [15:31:41.325] Label: 'future_lapply-1' [15:31:41.325] Expression: [15:31:41.325] { [15:31:41.325] do.call(function(...) { [15:31:41.325] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.325] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.325] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.325] on.exit(options(oopts), add = TRUE) [15:31:41.325] } [15:31:41.325] { [15:31:41.325] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.325] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.325] ...future.FUN(...future.X_jj, ...) [15:31:41.325] }) [15:31:41.325] } [15:31:41.325] }, args = future.call.arguments) [15:31:41.325] } [15:31:41.325] Lazy evaluation: FALSE [15:31:41.325] Asynchronous evaluation: TRUE [15:31:41.325] Local evaluation: TRUE [15:31:41.325] Environment: 0x000001e53306f180 [15:31:41.325] Capture standard output: TRUE [15:31:41.325] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.325] 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, ...) [15:31:41.325] Packages: [15:31:41.325] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.325] Resolved: TRUE [15:31:41.325] Value: [15:31:41.325] Conditions captured: [15:31:41.325] Early signaling: FALSE [15:31:41.325] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.325] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.354] Chunk #1 of 2 ... DONE [15:31:41.354] Chunk #2 of 2 ... [15:31:41.355] - Finding globals in 'X' for chunk #2 ... [15:31:41.355] + additional globals found: [n=0] [15:31:41.355] + additional namespaces needed: [n=0] [15:31:41.356] - Finding globals in 'X' for chunk #2 ... DONE [15:31:41.356] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:41.356] - seeds: [15:31:41.356] - All globals exported: [n=9] '...future.FUN', 'caller', 'args', 'call_my_add', 'my_add', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.378] Created future: [15:31:41.378] MultisessionFuture: [15:31:41.378] Label: 'future_lapply-2' [15:31:41.378] Expression: [15:31:41.378] { [15:31:41.378] do.call(function(...) { [15:31:41.378] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.378] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.378] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.378] on.exit(options(oopts), add = TRUE) [15:31:41.378] } [15:31:41.378] { [15:31:41.378] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.378] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.378] ...future.FUN(...future.X_jj, ...) [15:31:41.378] }) [15:31:41.378] } [15:31:41.378] }, args = future.call.arguments) [15:31:41.378] } [15:31:41.378] Lazy evaluation: FALSE [15:31:41.378] Asynchronous evaluation: TRUE [15:31:41.378] Local evaluation: TRUE [15:31:41.378] Environment: 0x000001e53306f180 [15:31:41.378] Capture standard output: TRUE [15:31:41.378] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.378] 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, ...) [15:31:41.378] Packages: [15:31:41.378] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.378] Resolved: TRUE [15:31:41.378] Value: [15:31:41.378] Conditions captured: [15:31:41.378] Early signaling: FALSE [15:31:41.378] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.378] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.403] Chunk #2 of 2 ... DONE [15:31:41.404] Launching 2 futures (chunks) ... DONE [15:31:41.404] Resolving 2 futures (chunks) ... [15:31:41.406] - Number of value chunks collected: 2 [15:31:41.406] Resolving 2 futures (chunks) ... DONE [15:31:41.406] Reducing values from 2 chunks ... [15:31:41.406] - Number of values collected after concatenation: 3 [15:31:41.407] - Number of values expected: 3 [15:31:41.407] Reducing values from 2 chunks ... DONE [15:31:41.407] future_lapply() ... DONE - future_lapply(x, FUN = do.call, ...) ... [15:31:41.408] future_lapply() ... [15:31:41.414] Number of chunks: 1 [15:31:41.415] getGlobalsAndPackagesXApply() ... [15:31:41.415] - future.globals: TRUE [15:31:41.421] - globals found/used: [n=1] 'FUN' [15:31:41.421] - needed namespaces: [n=0] [15:31:41.421] Finding globals ... DONE [15:31:41.422] - use_args: TRUE [15:31:41.422] - Getting '...' globals ... [15:31:41.422] - '...' content: [n=1] 'what' [15:31:41.422] List of 1 [15:31:41.422] $ ...:List of 1 [15:31:41.422] ..$ what:function (x) [15:31:41.422] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.422] - attr(*, "where")=List of 1 [15:31:41.422] ..$ ...: [15:31:41.422] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.422] - attr(*, "resolved")= logi TRUE [15:31:41.422] - attr(*, "total_size")= num NA [15:31:41.428] - Getting '...' globals ... DONE [15:31:41.428] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:41.429] List of 2 [15:31:41.429] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [15:31:41.429] $ ... :List of 1 [15:31:41.429] ..$ what:function (x) [15:31:41.429] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.429] - attr(*, "where")=List of 2 [15:31:41.429] ..$ ...future.FUN: [15:31:41.429] ..$ ... : [15:31:41.429] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.429] - attr(*, "resolved")= logi FALSE [15:31:41.429] - attr(*, "total_size")= num 12192 [15:31:41.434] Packages to be attached in all futures: [n=0] [15:31:41.435] getGlobalsAndPackagesXApply() ... DONE [15:31:41.435] Number of futures (= number of chunks): 1 [15:31:41.436] Launching 1 futures (chunks) ... [15:31:41.436] Chunk #1 of 1 ... [15:31:41.436] - Finding globals in 'X' for chunk #1 ... [15:31:41.437] + additional globals found: [n=0] [15:31:41.437] + additional namespaces needed: [n=0] [15:31:41.437] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.438] - seeds: [15:31:41.438] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.461] Created future: [15:31:41.462] MultisessionFuture: [15:31:41.462] Label: 'future_lapply-1' [15:31:41.462] Expression: [15:31:41.462] { [15:31:41.462] do.call(function(...) { [15:31:41.462] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.462] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.462] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.462] on.exit(options(oopts), add = TRUE) [15:31:41.462] } [15:31:41.462] { [15:31:41.462] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.462] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.462] ...future.FUN(...future.X_jj, ...) [15:31:41.462] }) [15:31:41.462] } [15:31:41.462] }, args = future.call.arguments) [15:31:41.462] } [15:31:41.462] Lazy evaluation: FALSE [15:31:41.462] Asynchronous evaluation: TRUE [15:31:41.462] Local evaluation: TRUE [15:31:41.462] Environment: R_GlobalEnv [15:31:41.462] Capture standard output: TRUE [15:31:41.462] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.462] 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) [15:31:41.462] Packages: [15:31:41.462] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.462] Resolved: TRUE [15:31:41.462] Value: [15:31:41.462] Conditions captured: [15:31:41.462] Early signaling: FALSE [15:31:41.462] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.462] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.488] Chunk #1 of 1 ... DONE [15:31:41.488] Launching 1 futures (chunks) ... DONE [15:31:41.489] Resolving 1 futures (chunks) ... [15:31:41.490] - Number of value chunks collected: 1 [15:31:41.490] Resolving 1 futures (chunks) ... DONE [15:31:41.491] Reducing values from 1 chunks ... [15:31:41.491] - Number of values collected after concatenation: 1 [15:31:41.491] - Number of values expected: 1 [15:31:41.492] Reducing values from 1 chunks ... DONE [15:31:41.492] future_lapply() ... DONE [15:31:41.492] future_lapply() ... [15:31:41.500] Number of chunks: 1 [15:31:41.500] getGlobalsAndPackagesXApply() ... [15:31:41.501] - future.globals: TRUE [15:31:41.507] - globals found/used: [n=1] 'FUN' [15:31:41.508] - needed namespaces: [n=0] [15:31:41.508] Finding globals ... DONE [15:31:41.508] - use_args: TRUE [15:31:41.509] - Getting '...' globals ... [15:31:41.510] - '...' content: [n=1] 'what' [15:31:41.510] List of 1 [15:31:41.510] $ ...:List of 1 [15:31:41.510] ..$ what:function (...) [15:31:41.510] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.510] - attr(*, "where")=List of 1 [15:31:41.510] ..$ ...: [15:31:41.510] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.510] - attr(*, "resolved")= logi TRUE [15:31:41.510] - attr(*, "total_size")= num NA [15:31:41.521] - Getting '...' globals ... DONE [15:31:41.522] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:41.522] List of 2 [15:31:41.522] $ ...future.FUN:function (what, args, quote = FALSE, envir = parent.frame()) [15:31:41.522] $ ... :List of 1 [15:31:41.522] ..$ what:function (...) [15:31:41.522] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.522] - attr(*, "where")=List of 2 [15:31:41.522] ..$ ...future.FUN: [15:31:41.522] ..$ ... : [15:31:41.522] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.522] - attr(*, "resolved")= logi FALSE [15:31:41.522] - attr(*, "total_size")= num 13352 [15:31:41.528] Packages to be attached in all futures: [n=0] [15:31:41.529] getGlobalsAndPackagesXApply() ... DONE [15:31:41.529] Number of futures (= number of chunks): 1 [15:31:41.529] Launching 1 futures (chunks) ... [15:31:41.530] Chunk #1 of 1 ... [15:31:41.530] - Finding globals in 'X' for chunk #1 ... [15:31:41.531] + additional globals found: [n=0] [15:31:41.531] + additional namespaces needed: [n=0] [15:31:41.532] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.532] - seeds: [15:31:41.532] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.560] Created future: [15:31:41.560] MultisessionFuture: [15:31:41.560] Label: 'future_lapply-1' [15:31:41.560] Expression: [15:31:41.560] { [15:31:41.560] do.call(function(...) { [15:31:41.560] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.560] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.560] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.560] on.exit(options(oopts), add = TRUE) [15:31:41.560] } [15:31:41.560] { [15:31:41.560] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.560] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.560] ...future.FUN(...future.X_jj, ...) [15:31:41.560] }) [15:31:41.560] } [15:31:41.560] }, args = future.call.arguments) [15:31:41.560] } [15:31:41.560] Lazy evaluation: FALSE [15:31:41.560] Asynchronous evaluation: TRUE [15:31:41.560] Local evaluation: TRUE [15:31:41.560] Environment: R_GlobalEnv [15:31:41.560] Capture standard output: TRUE [15:31:41.560] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.560] 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) [15:31:41.560] Packages: [15:31:41.560] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.560] Resolved: TRUE [15:31:41.560] Value: [15:31:41.560] Conditions captured: [15:31:41.560] Early signaling: FALSE [15:31:41.560] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.560] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.584] Chunk #1 of 1 ... DONE [15:31:41.584] Launching 1 futures (chunks) ... DONE [15:31:41.584] Resolving 1 futures (chunks) ... [15:31:41.585] - Number of value chunks collected: 1 [15:31:41.585] Resolving 1 futures (chunks) ... DONE [15:31:41.586] Reducing values from 1 chunks ... [15:31:41.586] - Number of values collected after concatenation: 1 [15:31:41.586] - Number of values expected: 1 [15:31:41.586] Reducing values from 1 chunks ... DONE [15:31:41.586] future_lapply() ... DONE - future_lapply(x, ...) - passing arguments via '...' ... [15:31:41.587] future_lapply() ... [15:31:41.591] Number of chunks: 1 [15:31:41.591] getGlobalsAndPackagesXApply() ... [15:31:41.591] - future.globals: TRUE [15:31:41.595] - globals found/used: [n=1] 'FUN' [15:31:41.595] - needed namespaces: [n=0] [15:31:41.595] Finding globals ... DONE [15:31:41.595] - use_args: TRUE [15:31:41.596] - Getting '...' globals ... [15:31:41.596] - '...' content: [n=1] 'b' [15:31:41.597] List of 1 [15:31:41.597] $ ...:List of 1 [15:31:41.597] ..$ b:'data.frame': 2 obs. of 1 variable: [15:31:41.597] .. ..$ a: int [1:2] 1 2 [15:31:41.597] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.597] - attr(*, "where")=List of 1 [15:31:41.597] ..$ ...: [15:31:41.597] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.597] - attr(*, "resolved")= logi TRUE [15:31:41.597] - attr(*, "total_size")= num NA [15:31:41.602] - Getting '...' globals ... DONE [15:31:41.602] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:41.602] List of 2 [15:31:41.602] $ ...future.FUN:function (a, b) [15:31:41.602] $ ... :List of 1 [15:31:41.602] ..$ b:'data.frame': 2 obs. of 1 variable: [15:31:41.602] .. ..$ a: int [1:2] 1 2 [15:31:41.602] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.602] - attr(*, "where")=List of 2 [15:31:41.602] ..$ ...future.FUN: [15:31:41.602] ..$ ... : [15:31:41.602] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.602] - attr(*, "resolved")= logi FALSE [15:31:41.602] - attr(*, "total_size")= num 1440 [15:31:41.608] Packages to be attached in all futures: [n=0] [15:31:41.608] getGlobalsAndPackagesXApply() ... DONE [15:31:41.609] Number of futures (= number of chunks): 1 [15:31:41.609] Launching 1 futures (chunks) ... [15:31:41.610] Chunk #1 of 1 ... [15:31:41.610] - Finding globals in 'X' for chunk #1 ... [15:31:41.611] + additional globals found: [n=0] [15:31:41.611] + additional namespaces needed: [n=0] [15:31:41.611] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.611] - seeds: [15:31:41.612] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.635] Created future: [15:31:41.636] MultisessionFuture: [15:31:41.636] Label: 'future_lapply-1' [15:31:41.636] Expression: [15:31:41.636] { [15:31:41.636] do.call(function(...) { [15:31:41.636] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.636] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.636] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.636] on.exit(options(oopts), add = TRUE) [15:31:41.636] } [15:31:41.636] { [15:31:41.636] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.636] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.636] ...future.FUN(...future.X_jj, ...) [15:31:41.636] }) [15:31:41.636] } [15:31:41.636] }, args = future.call.arguments) [15:31:41.636] } [15:31:41.636] Lazy evaluation: FALSE [15:31:41.636] Asynchronous evaluation: TRUE [15:31:41.636] Local evaluation: TRUE [15:31:41.636] Environment: R_GlobalEnv [15:31:41.636] Capture standard output: TRUE [15:31:41.636] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.636] 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) [15:31:41.636] Packages: [15:31:41.636] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.636] Resolved: TRUE [15:31:41.636] Value: [15:31:41.636] Conditions captured: [15:31:41.636] Early signaling: FALSE [15:31:41.636] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.636] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.660] Chunk #1 of 1 ... DONE [15:31:41.660] Launching 1 futures (chunks) ... DONE [15:31:41.660] Resolving 1 futures (chunks) ... [15:31:41.661] - Number of value chunks collected: 1 [15:31:41.661] Resolving 1 futures (chunks) ... DONE [15:31:41.661] Reducing values from 1 chunks ... [15:31:41.662] - Number of values collected after concatenation: 1 [15:31:41.662] - Number of values expected: 1 [15:31:41.662] Reducing values from 1 chunks ... DONE [15:31:41.662] future_lapply() ... DONE [15:31:41.662] future_lapply() ... [15:31:41.666] Number of chunks: 1 [15:31:41.666] getGlobalsAndPackagesXApply() ... [15:31:41.666] - future.globals: TRUE [15:31:41.669] - globals found/used: [n=1] 'FUN' [15:31:41.669] - needed namespaces: [n=0] [15:31:41.670] Finding globals ... DONE [15:31:41.670] - use_args: TRUE [15:31:41.670] - Getting '...' globals ... [15:31:41.671] - '...' content: [n=1] 'b' [15:31:41.671] List of 1 [15:31:41.671] $ ...:List of 1 [15:31:41.671] ..$ b: [15:31:41.671] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.671] - attr(*, "where")=List of 1 [15:31:41.671] ..$ ...: [15:31:41.671] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.671] - attr(*, "resolved")= logi TRUE [15:31:41.671] - attr(*, "total_size")= num NA [15:31:41.677] - Getting '...' globals ... DONE [15:31:41.677] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:41.678] List of 2 [15:31:41.678] $ ...future.FUN:function (a, b) [15:31:41.678] $ ... :List of 1 [15:31:41.678] ..$ b: [15:31:41.678] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.678] - attr(*, "where")=List of 2 [15:31:41.678] ..$ ...future.FUN: [15:31:41.678] ..$ ... : [15:31:41.678] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.678] - attr(*, "resolved")= logi FALSE [15:31:41.678] - attr(*, "total_size")= num 1440 [15:31:41.683] Packages to be attached in all futures: [n=0] [15:31:41.684] getGlobalsAndPackagesXApply() ... DONE [15:31:41.684] Number of futures (= number of chunks): 1 [15:31:41.685] Launching 1 futures (chunks) ... [15:31:41.685] Chunk #1 of 1 ... [15:31:41.685] - Finding globals in 'X' for chunk #1 ... [15:31:41.686] + additional globals found: [n=0] [15:31:41.686] + additional namespaces needed: [n=0] [15:31:41.686] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.687] - seeds: [15:31:41.687] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.710] Created future: [15:31:41.710] MultisessionFuture: [15:31:41.710] Label: 'future_lapply-1' [15:31:41.710] Expression: [15:31:41.710] { [15:31:41.710] do.call(function(...) { [15:31:41.710] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.710] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.710] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.710] on.exit(options(oopts), add = TRUE) [15:31:41.710] } [15:31:41.710] { [15:31:41.710] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.710] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.710] ...future.FUN(...future.X_jj, ...) [15:31:41.710] }) [15:31:41.710] } [15:31:41.710] }, args = future.call.arguments) [15:31:41.710] } [15:31:41.710] Lazy evaluation: FALSE [15:31:41.710] Asynchronous evaluation: TRUE [15:31:41.710] Local evaluation: TRUE [15:31:41.710] Environment: R_GlobalEnv [15:31:41.710] Capture standard output: TRUE [15:31:41.710] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.710] 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) [15:31:41.710] Packages: [15:31:41.710] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.710] Resolved: TRUE [15:31:41.710] Value: [15:31:41.710] Conditions captured: [15:31:41.710] Early signaling: FALSE [15:31:41.710] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.710] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:41.744] Chunk #1 of 1 ... DONE [15:31:41.745] Launching 1 futures (chunks) ... DONE [15:31:41.745] Resolving 1 futures (chunks) ... [15:31:41.747] - Number of value chunks collected: 1 [15:31:41.747] Resolving 1 futures (chunks) ... DONE [15:31:41.747] Reducing values from 1 chunks ... [15:31:41.748] - Number of values collected after concatenation: 1 [15:31:41.748] - Number of values expected: 1 [15:31:41.748] Reducing values from 1 chunks ... DONE [15:31:41.749] future_lapply() ... DONE [15:31:41.749] future_lapply() ... [15:31:41.754] Number of chunks: 1 [15:31:41.754] getGlobalsAndPackagesXApply() ... [15:31:41.754] - future.globals: TRUE [15:31:41.758] - globals found/used: [n=1] 'FUN' [15:31:41.758] - needed namespaces: [n=0] [15:31:41.758] Finding globals ... DONE [15:31:41.759] - use_args: TRUE [15:31:41.759] - Getting '...' globals ... [15:31:41.759] - '...' content: [n=1] 'b' [15:31:41.759] List of 1 [15:31:41.759] $ ...:List of 1 [15:31:41.759] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [15:31:41.759] .. .. ..@ slots :List of 4 [15:31:41.759] .. .. .. ..$ .Data : chr "function" [15:31:41.759] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. ..$ target : chr "signature" [15:31:41.759] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. ..$ defined: chr "signature" [15:31:41.759] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. ..$ generic: chr "character" [15:31:41.759] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. ..@ contains :List of 3 [15:31:41.759] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "function" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr "function" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 2 [15:31:41.759] .. .. ..@ virtual : logi FALSE [15:31:41.759] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [15:31:41.759] list() [15:31:41.759] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [15:31:41.759] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:41.759] .. .. .. .. .. .. ..@ names : chr(0) [15:31:41.759] .. .. .. .. .. .. ..@ package: chr(0) [15:31:41.759] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [15:31:41.759] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:41.759] .. .. .. .. .. .. ..@ names : chr(0) [15:31:41.759] .. .. .. .. .. .. ..@ package: chr(0) [15:31:41.759] .. .. .. .. ..$ generic: chr(0) [15:31:41.759] .. .. ..@ validity : NULL [15:31:41.759] .. .. ..@ access : list() [15:31:41.759] .. .. ..@ className : chr "MethodDefinition" [15:31:41.759] .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. ..@ package : chr "methods" [15:31:41.759] .. .. ..@ subclasses:List of 7 [15:31:41.759] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr(0) [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 1 [15:31:41.759] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 2 [15:31:41.759] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr "MethodWithNext" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 2 [15:31:41.759] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.759] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.759] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.759] .. .. .. .. .. ..@ test :function (object) [15:31:41.759] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.759] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.759] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:41.759] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.759] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.759] .. .. .. .. .. ..@ distance : num 2 [15:31:41.759] .. .. ..@ versionKey: [15:31:41.759] .. .. ..@ sealed : logi TRUE [15:31:41.759] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.759] - attr(*, "where")=List of 1 [15:31:41.759] ..$ ...: [15:31:41.759] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.759] - attr(*, "resolved")= logi TRUE [15:31:41.759] - attr(*, "total_size")= num NA [15:31:41.838] - Getting '...' globals ... DONE [15:31:41.838] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:41.838] List of 2 [15:31:41.838] $ ...future.FUN:function (a, b) [15:31:41.838] $ ... :List of 1 [15:31:41.838] ..$ b:Formal class 'classRepresentation' [package "methods"] with 11 slots [15:31:41.838] .. .. ..@ slots :List of 4 [15:31:41.838] .. .. .. ..$ .Data : chr "function" [15:31:41.838] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. ..$ target : chr "signature" [15:31:41.838] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. ..$ defined: chr "signature" [15:31:41.838] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. ..$ generic: chr "character" [15:31:41.838] .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. ..@ contains :List of 3 [15:31:41.838] .. .. .. ..$ function :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "function" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ PossibleMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "PossibleMethod" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ OptionalFunction:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "OptionalFunction" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr "function" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 2 [15:31:41.838] .. .. ..@ virtual : logi FALSE [15:31:41.838] .. .. ..@ prototype :Formal class 'function' [package ""] with 0 slots [15:31:41.838] list() [15:31:41.838] .. .. .. .. ..$ target :Formal class 'signature' [package "methods"] with 3 slots [15:31:41.838] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:41.838] .. .. .. .. .. .. ..@ names : chr(0) [15:31:41.838] .. .. .. .. .. .. ..@ package: chr(0) [15:31:41.838] .. .. .. .. ..$ defined:Formal class 'signature' [package "methods"] with 3 slots [15:31:41.838] .. .. .. .. .. .. ..@ .Data : chr(0) [15:31:41.838] .. .. .. .. .. .. ..@ names : chr(0) [15:31:41.838] .. .. .. .. .. .. ..@ package: chr(0) [15:31:41.838] .. .. .. .. ..$ generic: chr(0) [15:31:41.838] .. .. ..@ validity : NULL [15:31:41.838] .. .. ..@ access : list() [15:31:41.838] .. .. ..@ className : chr "MethodDefinition" [15:31:41.838] .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. ..@ package : chr "methods" [15:31:41.838] .. .. ..@ subclasses:List of 7 [15:31:41.838] .. .. .. ..$ derivedDefaultMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethod" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ MethodWithNext :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodWithNext" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ SealedMethodDefinition :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "SealedMethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ MethodDefinitionWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodDefinitionWithTrace" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr(0) [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 1 [15:31:41.838] .. .. .. ..$ internalDispatchMethod :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "internalDispatchMethod" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 2 [15:31:41.838] .. .. .. ..$ MethodWithNextWithTrace :Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "MethodWithNextWithTrace" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr "MethodWithNext" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 2 [15:31:41.838] .. .. .. ..$ derivedDefaultMethodWithTrace:Formal class 'SClassExtension' [package "methods"] with 10 slots [15:31:41.838] .. .. .. .. .. ..@ subClass : chr "derivedDefaultMethodWithTrace" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ superClass: chr "MethodDefinition" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ package : chr "methods" [15:31:41.838] .. .. .. .. .. ..@ coerce :function (from, strict = TRUE) [15:31:41.838] .. .. .. .. .. ..@ test :function (object) [15:31:41.838] .. .. .. .. .. ..@ replace :function (from, to, value) [15:31:41.838] .. .. .. .. .. ..@ simple : logi TRUE [15:31:41.838] .. .. .. .. .. ..@ by : chr "derivedDefaultMethod" [15:31:41.838] .. .. .. .. .. .. ..- attr(*, "package")= chr "methods" [15:31:41.838] .. .. .. .. .. ..@ dataPart : logi FALSE [15:31:41.838] .. .. .. .. .. ..@ distance : num 2 [15:31:41.838] .. .. ..@ versionKey: [15:31:41.838] .. .. ..@ sealed : logi TRUE [15:31:41.838] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:41.838] - attr(*, "where")=List of 2 [15:31:41.838] ..$ ...future.FUN: [15:31:41.838] ..$ ... : [15:31:41.838] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:41.838] - attr(*, "resolved")= logi FALSE [15:31:41.838] - attr(*, "total_size")= num 405168 [15:31:41.942] Packages to be attached in all futures: [n=0] [15:31:41.943] getGlobalsAndPackagesXApply() ... DONE [15:31:41.943] Number of futures (= number of chunks): 1 [15:31:41.944] Launching 1 futures (chunks) ... [15:31:41.944] Chunk #1 of 1 ... [15:31:41.944] - Finding globals in 'X' for chunk #1 ... [15:31:41.945] + additional globals found: [n=0] [15:31:41.945] + additional namespaces needed: [n=0] [15:31:41.946] - Finding globals in 'X' for chunk #1 ... DONE [15:31:41.946] - seeds: [15:31:41.946] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:41.972] Created future: [15:31:41.972] MultisessionFuture: [15:31:41.972] Label: 'future_lapply-1' [15:31:41.972] Expression: [15:31:41.972] { [15:31:41.972] do.call(function(...) { [15:31:41.972] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:41.972] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:41.972] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:41.972] on.exit(options(oopts), add = TRUE) [15:31:41.972] } [15:31:41.972] { [15:31:41.972] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:41.972] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:41.972] ...future.FUN(...future.X_jj, ...) [15:31:41.972] }) [15:31:41.972] } [15:31:41.972] }, args = future.call.arguments) [15:31:41.972] } [15:31:41.972] Lazy evaluation: FALSE [15:31:41.972] Asynchronous evaluation: TRUE [15:31:41.972] Local evaluation: TRUE [15:31:41.972] Environment: R_GlobalEnv [15:31:41.972] Capture standard output: TRUE [15:31:41.972] Capture condition classes: 'condition' (excluding 'nothing') [15:31:41.972] 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) [15:31:41.972] Packages: [15:31:41.972] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:41.972] Resolved: TRUE [15:31:41.972] Value: [15:31:41.972] Conditions captured: [15:31:41.972] Early signaling: FALSE [15:31:41.972] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:41.972] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.001] Chunk #1 of 1 ... DONE [15:31:42.001] Launching 1 futures (chunks) ... DONE [15:31:42.001] Resolving 1 futures (chunks) ... [15:31:42.003] - Number of value chunks collected: 1 [15:31:42.003] Resolving 1 futures (chunks) ... DONE [15:31:42.003] Reducing values from 1 chunks ... [15:31:42.003] - Number of values collected after concatenation: 1 [15:31:42.004] - Number of values expected: 1 [15:31:42.004] Reducing values from 1 chunks ... DONE [15:31:42.004] future_lapply() ... DONE - future_lapply(X, ...) - 'X' containing globals ... List of 4 $ : num 84 $ : num 10.5 $ : num 63 $ : int 11 [15:31:42.008] future_lapply() ... [15:31:42.013] Number of chunks: 2 [15:31:42.014] getGlobalsAndPackagesXApply() ... [15:31:42.014] - future.globals: TRUE [15:31:42.017] - globals found/used: [n=1] 'FUN' [15:31:42.018] - needed namespaces: [n=0] [15:31:42.018] Finding globals ... DONE [15:31:42.018] - use_args: TRUE [15:31:42.019] - Getting '...' globals ... [15:31:42.019] - '...' content: [n=0] [15:31:42.020] List of 1 [15:31:42.020] $ ...: list() [15:31:42.020] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.020] - attr(*, "where")=List of 1 [15:31:42.020] ..$ ...: [15:31:42.020] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.020] - attr(*, "resolved")= logi TRUE [15:31:42.020] - attr(*, "total_size")= num NA [15:31:42.025] - Getting '...' globals ... DONE [15:31:42.025] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:42.025] List of 2 [15:31:42.025] $ ...future.FUN:function (f) [15:31:42.025] $ ... : list() [15:31:42.025] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.025] - attr(*, "where")=List of 2 [15:31:42.025] ..$ ...future.FUN: [15:31:42.025] ..$ ... : [15:31:42.025] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.025] - attr(*, "resolved")= logi FALSE [15:31:42.025] - attr(*, "total_size")= num 1008 [15:31:42.031] Packages to be attached in all futures: [n=0] [15:31:42.031] getGlobalsAndPackagesXApply() ... DONE [15:31:42.031] Number of futures (= number of chunks): 2 [15:31:42.032] Launching 2 futures (chunks) ... [15:31:42.032] Chunk #1 of 2 ... [15:31:42.032] - Finding globals in 'X' for chunk #1 ... [15:31:42.036] + additional globals found: [n=2] 'a', 'b' [15:31:42.036] + additional namespaces needed: [n=0] [15:31:42.037] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.037] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.038] - seeds: [15:31:42.038] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [15:31:42.067] Created future: [15:31:42.068] MultisessionFuture: [15:31:42.068] Label: 'future_lapply-1' [15:31:42.068] Expression: [15:31:42.068] { [15:31:42.068] do.call(function(...) { [15:31:42.068] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.068] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.068] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.068] on.exit(options(oopts), add = TRUE) [15:31:42.068] } [15:31:42.068] { [15:31:42.068] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.068] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.068] ...future.FUN(...future.X_jj, ...) [15:31:42.068] }) [15:31:42.068] } [15:31:42.068] }, args = future.call.arguments) [15:31:42.068] } [15:31:42.068] Lazy evaluation: FALSE [15:31:42.068] Asynchronous evaluation: TRUE [15:31:42.068] Local evaluation: TRUE [15:31:42.068] Environment: R_GlobalEnv [15:31:42.068] Capture standard output: TRUE [15:31:42.068] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.068] 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, ...) [15:31:42.068] Packages: [15:31:42.068] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.068] Resolved: TRUE [15:31:42.068] Value: [15:31:42.068] Conditions captured: [15:31:42.068] Early signaling: FALSE [15:31:42.068] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.068] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.094] Chunk #1 of 2 ... DONE [15:31:42.095] Chunk #2 of 2 ... [15:31:42.095] - Finding globals in 'X' for chunk #2 ... [15:31:42.099] + additional globals found: [n=2] 'a', 'b' [15:31:42.099] + additional namespaces needed: [n=1] 'tools' [15:31:42.100] - Finding globals in 'X' for chunk #2 ... DONE [15:31:42.100] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.100] - seeds: [15:31:42.101] - All globals exported: [n=7] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize', 'a', 'b' [15:31:42.127] Created future: [15:31:42.127] MultisessionFuture: [15:31:42.127] Label: 'future_lapply-2' [15:31:42.127] Expression: [15:31:42.127] { [15:31:42.127] do.call(function(...) { [15:31:42.127] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.127] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.127] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.127] on.exit(options(oopts), add = TRUE) [15:31:42.127] } [15:31:42.127] { [15:31:42.127] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.127] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.127] ...future.FUN(...future.X_jj, ...) [15:31:42.127] }) [15:31:42.127] } [15:31:42.127] }, args = future.call.arguments) [15:31:42.127] } [15:31:42.127] Lazy evaluation: FALSE [15:31:42.127] Asynchronous evaluation: TRUE [15:31:42.127] Local evaluation: TRUE [15:31:42.127] Environment: R_GlobalEnv [15:31:42.127] Capture standard output: TRUE [15:31:42.127] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.127] 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, ...) [15:31:42.127] Packages: 1 packages ('tools') [15:31:42.127] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.127] Resolved: TRUE [15:31:42.127] Value: [15:31:42.127] Conditions captured: [15:31:42.127] Early signaling: FALSE [15:31:42.127] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.127] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.158] Chunk #2 of 2 ... DONE [15:31:42.158] Launching 2 futures (chunks) ... DONE [15:31:42.159] Resolving 2 futures (chunks) ... [15:31:42.160] - Number of value chunks collected: 2 [15:31:42.161] Resolving 2 futures (chunks) ... DONE [15:31:42.161] Reducing values from 2 chunks ... [15:31:42.161] - Number of values collected after concatenation: 4 [15:31:42.162] - Number of values expected: 4 [15:31:42.162] Reducing values from 2 chunks ... DONE [15:31:42.162] 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 [15:31:42.168] future_lapply() ... [15:31:42.173] Number of chunks: 1 [15:31:42.174] getGlobalsAndPackagesXApply() ... [15:31:42.174] - future.globals: TRUE [15:31:42.178] - globals found/used: [n=2] 'FUN', 'future.call.arguments' [15:31:42.179] - needed namespaces: [n=0] [15:31:42.179] Finding globals ... DONE [15:31:42.179] - use_args: TRUE [15:31:42.180] - Getting '...' globals ... [15:31:42.180] - '...' content: [n=0] [15:31:42.181] List of 1 [15:31:42.181] $ ...: list() [15:31:42.181] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.181] - attr(*, "where")=List of 1 [15:31:42.181] ..$ ...: [15:31:42.181] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.181] - attr(*, "resolved")= logi TRUE [15:31:42.181] - attr(*, "total_size")= num NA [15:31:42.186] - Getting '...' globals ... DONE [15:31:42.187] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'future.call.arguments', '...' [15:31:42.187] List of 3 [15:31:42.187] $ ...future.FUN :function (x) [15:31:42.187] $ future.call.arguments:List of 1 [15:31:42.187] ..$ a: num 1 [15:31:42.187] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.187] $ ... : list() [15:31:42.187] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.187] - attr(*, "where")=List of 3 [15:31:42.187] ..$ ...future.FUN : [15:31:42.187] ..$ future.call.arguments: [15:31:42.187] ..$ ... : [15:31:42.187] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.187] - attr(*, "resolved")= logi FALSE [15:31:42.187] - attr(*, "total_size")= num 1272 [15:31:42.195] Packages to be attached in all futures: [n=0] [15:31:42.195] getGlobalsAndPackagesXApply() ... DONE [15:31:42.195] Number of futures (= number of chunks): 1 [15:31:42.196] Launching 1 futures (chunks) ... [15:31:42.196] Chunk #1 of 1 ... [15:31:42.196] - Finding globals in 'X' for chunk #1 ... [15:31:42.197] + additional globals found: [n=0] [15:31:42.197] + additional namespaces needed: [n=0] [15:31:42.198] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.198] - seeds: [15:31:42.198] - All globals exported: [n=6] '...future.FUN', 'future.call.arguments', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.224] Created future: [15:31:42.225] MultisessionFuture: [15:31:42.225] Label: 'future_lapply-1' [15:31:42.225] Expression: [15:31:42.225] { [15:31:42.225] do.call(function(...) { [15:31:42.225] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.225] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.225] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.225] on.exit(options(oopts), add = TRUE) [15:31:42.225] } [15:31:42.225] { [15:31:42.225] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.225] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.225] ...future.FUN(...future.X_jj) [15:31:42.225] }) [15:31:42.225] } [15:31:42.225] }, args = future.call.arguments) [15:31:42.225] } [15:31:42.225] Lazy evaluation: FALSE [15:31:42.225] Asynchronous evaluation: TRUE [15:31:42.225] Local evaluation: TRUE [15:31:42.225] Environment: 0x000001e52f1b5300 [15:31:42.225] Capture standard output: TRUE [15:31:42.225] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.225] 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) [15:31:42.225] Packages: [15:31:42.225] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.225] Resolved: TRUE [15:31:42.225] Value: [15:31:42.225] Conditions captured: [15:31:42.225] Early signaling: FALSE [15:31:42.225] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.225] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.257] Chunk #1 of 1 ... DONE [15:31:42.257] Launching 1 futures (chunks) ... DONE [15:31:42.257] Resolving 1 futures (chunks) ... [15:31:42.258] - Number of value chunks collected: 1 [15:31:42.259] Resolving 1 futures (chunks) ... DONE [15:31:42.259] Reducing values from 1 chunks ... [15:31:42.259] - Number of values collected after concatenation: 1 [15:31:42.259] - Number of values expected: 1 [15:31:42.260] Reducing values from 1 chunks ... DONE [15:31:42.260] future_lapply() ... DONE List of 1 $ z1:List of 1 ..$ :List of 1 .. ..$ a: num 1 - future_lapply(X, ...) - '{ a <- a + 1; a }' ... [15:31:42.263] future_lapply() ... [15:31:42.268] Number of chunks: 1 [15:31:42.268] getGlobalsAndPackagesXApply() ... [15:31:42.269] - future.globals: TRUE [15:31:42.273] - globals found/used: [n=2] 'FUN', 'a' [15:31:42.274] - needed namespaces: [n=0] [15:31:42.274] Finding globals ... DONE [15:31:42.274] - use_args: TRUE [15:31:42.274] - Getting '...' globals ... [15:31:42.275] - '...' content: [n=0] [15:31:42.276] List of 1 [15:31:42.276] $ ...: list() [15:31:42.276] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.276] - attr(*, "where")=List of 1 [15:31:42.276] ..$ ...: [15:31:42.276] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.276] - attr(*, "resolved")= logi TRUE [15:31:42.276] - attr(*, "total_size")= num NA [15:31:42.281] - Getting '...' globals ... DONE [15:31:42.281] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [15:31:42.281] List of 3 [15:31:42.281] $ ...future.FUN:function (ii) [15:31:42.281] $ a : num 1 [15:31:42.281] $ ... : list() [15:31:42.281] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.281] - attr(*, "where")=List of 3 [15:31:42.281] ..$ ...future.FUN: [15:31:42.281] ..$ a : [15:31:42.281] ..$ ... : [15:31:42.281] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.281] - attr(*, "resolved")= logi FALSE [15:31:42.281] - attr(*, "total_size")= num 2984 [15:31:42.292] Packages to be attached in all futures: [n=0] [15:31:42.292] getGlobalsAndPackagesXApply() ... DONE [15:31:42.292] Number of futures (= number of chunks): 1 [15:31:42.293] Launching 1 futures (chunks) ... [15:31:42.293] Chunk #1 of 1 ... [15:31:42.293] - Finding globals in 'X' for chunk #1 ... [15:31:42.294] + additional globals found: [n=0] [15:31:42.294] + additional namespaces needed: [n=0] [15:31:42.295] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.295] - seeds: [15:31:42.295] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.320] Created future: [15:31:42.321] MultisessionFuture: [15:31:42.321] Label: 'future_lapply-1' [15:31:42.321] Expression: [15:31:42.321] { [15:31:42.321] do.call(function(...) { [15:31:42.321] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.321] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.321] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.321] on.exit(options(oopts), add = TRUE) [15:31:42.321] } [15:31:42.321] { [15:31:42.321] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.321] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.321] ...future.FUN(...future.X_jj, ...) [15:31:42.321] }) [15:31:42.321] } [15:31:42.321] }, args = future.call.arguments) [15:31:42.321] } [15:31:42.321] Lazy evaluation: FALSE [15:31:42.321] Asynchronous evaluation: TRUE [15:31:42.321] Local evaluation: TRUE [15:31:42.321] Environment: R_GlobalEnv [15:31:42.321] Capture standard output: TRUE [15:31:42.321] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.321] 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, ...) [15:31:42.321] Packages: [15:31:42.321] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.321] Resolved: TRUE [15:31:42.321] Value: [15:31:42.321] Conditions captured: [15:31:42.321] Early signaling: FALSE [15:31:42.321] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.321] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.347] Chunk #1 of 1 ... DONE [15:31:42.347] Launching 1 futures (chunks) ... DONE [15:31:42.347] Resolving 1 futures (chunks) ... [15:31:42.348] - Number of value chunks collected: 1 [15:31:42.348] Resolving 1 futures (chunks) ... DONE [15:31:42.349] Reducing values from 1 chunks ... [15:31:42.349] - Number of values collected after concatenation: 1 [15:31:42.349] - Number of values expected: 1 [15:31:42.349] Reducing values from 1 chunks ... DONE [15:31:42.350] future_lapply() ... DONE - future_lapply(X, ...) - '{ a; a <- a + 1 }' ... [15:31:42.350] future_lapply() ... [15:31:42.357] Number of chunks: 1 [15:31:42.357] getGlobalsAndPackagesXApply() ... [15:31:42.357] - future.globals: TRUE [15:31:42.363] - globals found/used: [n=2] 'FUN', 'a' [15:31:42.363] - needed namespaces: [n=0] [15:31:42.363] Finding globals ... DONE [15:31:42.363] - use_args: TRUE [15:31:42.364] - Getting '...' globals ... [15:31:42.365] - '...' content: [n=0] [15:31:42.365] List of 1 [15:31:42.365] $ ...: list() [15:31:42.365] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.365] - attr(*, "where")=List of 1 [15:31:42.365] ..$ ...: [15:31:42.365] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.365] - attr(*, "resolved")= logi TRUE [15:31:42.365] - attr(*, "total_size")= num NA [15:31:42.371] - Getting '...' globals ... DONE [15:31:42.371] Globals to be used in all futures (chunks): [n=3] '...future.FUN', 'a', '...' [15:31:42.371] List of 3 [15:31:42.371] $ ...future.FUN:function (ii) [15:31:42.371] $ a : num 1 [15:31:42.371] $ ... : list() [15:31:42.371] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.371] - attr(*, "where")=List of 3 [15:31:42.371] ..$ ...future.FUN: [15:31:42.371] ..$ a : [15:31:42.371] ..$ ... : [15:31:42.371] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.371] - attr(*, "resolved")= logi FALSE [15:31:42.371] - attr(*, "total_size")= num 2984 [15:31:42.378] Packages to be attached in all futures: [n=0] [15:31:42.378] getGlobalsAndPackagesXApply() ... DONE [15:31:42.379] Number of futures (= number of chunks): 1 [15:31:42.379] Launching 1 futures (chunks) ... [15:31:42.379] Chunk #1 of 1 ... [15:31:42.379] - Finding globals in 'X' for chunk #1 ... [15:31:42.380] + additional globals found: [n=0] [15:31:42.380] + additional namespaces needed: [n=0] [15:31:42.380] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.381] - seeds: [15:31:42.381] - All globals exported: [n=6] '...future.FUN', 'a', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.408] Created future: [15:31:42.408] MultisessionFuture: [15:31:42.408] Label: 'future_lapply-1' [15:31:42.408] Expression: [15:31:42.408] { [15:31:42.408] do.call(function(...) { [15:31:42.408] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.408] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.408] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.408] on.exit(options(oopts), add = TRUE) [15:31:42.408] } [15:31:42.408] { [15:31:42.408] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.408] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.408] ...future.FUN(...future.X_jj, ...) [15:31:42.408] }) [15:31:42.408] } [15:31:42.408] }, args = future.call.arguments) [15:31:42.408] } [15:31:42.408] Lazy evaluation: FALSE [15:31:42.408] Asynchronous evaluation: TRUE [15:31:42.408] Local evaluation: TRUE [15:31:42.408] Environment: R_GlobalEnv [15:31:42.408] Capture standard output: TRUE [15:31:42.408] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.408] 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, ...) [15:31:42.408] Packages: [15:31:42.408] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.408] Resolved: TRUE [15:31:42.408] Value: [15:31:42.408] Conditions captured: [15:31:42.408] Early signaling: FALSE [15:31:42.408] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.408] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.436] Chunk #1 of 1 ... DONE [15:31:42.436] Launching 1 futures (chunks) ... DONE [15:31:42.436] Resolving 1 futures (chunks) ... [15:31:42.437] - Number of value chunks collected: 1 [15:31:42.437] Resolving 1 futures (chunks) ... DONE [15:31:42.437] Reducing values from 1 chunks ... [15:31:42.437] - Number of values collected after concatenation: 1 [15:31:42.438] - Number of values expected: 1 [15:31:42.438] Reducing values from 1 chunks ... DONE [15:31:42.438] future_lapply() ... DONE - future_lapply(..., future.globals = ) ... [15:31:42.438] future_lapply() ... [15:31:42.442] Number of chunks: 1 [15:31:42.443] getGlobalsAndPackagesXApply() ... [15:31:42.443] - future.globals: with names '42' [15:31:42.443] - use_args: TRUE [15:31:42.444] - Getting '...' globals ... [15:31:42.445] - '...' content: [n=0] [15:31:42.445] List of 1 [15:31:42.445] $ ...: list() [15:31:42.445] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.445] - attr(*, "where")=List of 1 [15:31:42.445] ..$ ...: [15:31:42.445] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.445] - attr(*, "resolved")= logi TRUE [15:31:42.445] - attr(*, "total_size")= num NA [15:31:42.450] - Getting '...' globals ... DONE [15:31:42.450] Globals to be used in all futures (chunks): [n=3] 'a', '...future.FUN', '...' [15:31:42.450] List of 3 [15:31:42.450] $ a : num 42 [15:31:42.450] $ ...future.FUN:function (x) [15:31:42.450] $ ... : list() [15:31:42.450] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.450] - attr(*, "where")=List of 3 [15:31:42.450] ..$ a : [15:31:42.450] ..$ ...future.FUN: [15:31:42.450] ..$ ... : [15:31:42.450] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.450] - attr(*, "resolved")= logi FALSE [15:31:42.450] - attr(*, "total_size")= num NA [15:31:42.456] Packages to be attached in all futures: [n=0] [15:31:42.456] getGlobalsAndPackagesXApply() ... DONE [15:31:42.457] Number of futures (= number of chunks): 1 [15:31:42.457] Launching 1 futures (chunks) ... [15:31:42.457] Chunk #1 of 1 ... [15:31:42.458] - seeds: [15:31:42.458] - All globals exported: [n=6] 'a', '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.482] Created future: [15:31:42.482] MultisessionFuture: [15:31:42.482] Label: 'future_lapply-1' [15:31:42.482] Expression: [15:31:42.482] { [15:31:42.482] do.call(function(...) { [15:31:42.482] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.482] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.482] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.482] on.exit(options(oopts), add = TRUE) [15:31:42.482] } [15:31:42.482] { [15:31:42.482] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.482] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.482] ...future.FUN(...future.X_jj, ...) [15:31:42.482] }) [15:31:42.482] } [15:31:42.482] }, args = future.call.arguments) [15:31:42.482] } [15:31:42.482] Lazy evaluation: FALSE [15:31:42.482] Asynchronous evaluation: TRUE [15:31:42.482] Local evaluation: TRUE [15:31:42.482] Environment: R_GlobalEnv [15:31:42.482] Capture standard output: TRUE [15:31:42.482] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.482] 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, ...) [15:31:42.482] Packages: [15:31:42.482] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.482] Resolved: TRUE [15:31:42.482] Value: [15:31:42.482] Conditions captured: [15:31:42.482] Early signaling: FALSE [15:31:42.482] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.482] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.510] Chunk #1 of 1 ... DONE [15:31:42.510] Launching 1 futures (chunks) ... DONE [15:31:42.510] Resolving 1 futures (chunks) ... [15:31:42.512] - Number of value chunks collected: 1 [15:31:42.512] Resolving 1 futures (chunks) ... DONE [15:31:42.512] Reducing values from 1 chunks ... [15:31:42.512] - Number of values collected after concatenation: 1 [15:31:42.513] - Number of values expected: 1 [15:31:42.513] Reducing values from 1 chunks ... DONE [15:31:42.513] 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) [15:31:42.519] future_lapply() ... [15:31:42.524] Number of chunks: 2 [15:31:42.524] getGlobalsAndPackagesXApply() ... [15:31:42.524] - future.globals: TRUE [15:31:42.527] - globals found/used: [n=1] 'FUN' [15:31:42.528] - needed namespaces: [n=0] [15:31:42.528] Finding globals ... DONE [15:31:42.528] - use_args: TRUE [15:31:42.528] - Getting '...' globals ... [15:31:42.529] - '...' content: [n=0] [15:31:42.529] List of 1 [15:31:42.529] $ ...: list() [15:31:42.529] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.529] - attr(*, "where")=List of 1 [15:31:42.529] ..$ ...: [15:31:42.529] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.529] - attr(*, "resolved")= logi TRUE [15:31:42.529] - attr(*, "total_size")= num NA [15:31:42.534] - Getting '...' globals ... DONE [15:31:42.534] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:42.535] List of 2 [15:31:42.535] $ ...future.FUN:function (y) [15:31:42.535] $ ... : list() [15:31:42.535] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.535] - attr(*, "where")=List of 2 [15:31:42.535] ..$ ...future.FUN: [15:31:42.535] ..$ ... : [15:31:42.535] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.535] - attr(*, "resolved")= logi FALSE [15:31:42.535] - attr(*, "total_size")= num 280 [15:31:42.540] Packages to be attached in all futures: [n=0] [15:31:42.540] getGlobalsAndPackagesXApply() ... DONE [15:31:42.540] Number of futures (= number of chunks): 2 [15:31:42.541] Launching 2 futures (chunks) ... [15:31:42.541] Chunk #1 of 2 ... [15:31:42.541] - Finding globals in 'X' for chunk #1 ... [15:31:42.542] + additional globals found: [n=0] [15:31:42.542] + additional namespaces needed: [n=0] [15:31:42.543] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.543] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.543] - seeds: [15:31:42.543] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.566] Created future: [15:31:42.567] MultisessionFuture: [15:31:42.567] Label: 'future_lapply-1' [15:31:42.567] Expression: [15:31:42.567] { [15:31:42.567] do.call(function(...) { [15:31:42.567] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.567] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.567] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.567] on.exit(options(oopts), add = TRUE) [15:31:42.567] } [15:31:42.567] { [15:31:42.567] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.567] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.567] ...future.FUN(...future.X_jj, ...) [15:31:42.567] }) [15:31:42.567] } [15:31:42.567] }, args = future.call.arguments) [15:31:42.567] } [15:31:42.567] Lazy evaluation: FALSE [15:31:42.567] Asynchronous evaluation: TRUE [15:31:42.567] Local evaluation: TRUE [15:31:42.567] Environment: 0x000001e531534ff0 [15:31:42.567] Capture standard output: TRUE [15:31:42.567] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.567] 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) [15:31:42.567] Packages: [15:31:42.567] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.567] Resolved: TRUE [15:31:42.567] Value: [15:31:42.567] Conditions captured: [15:31:42.567] Early signaling: FALSE [15:31:42.567] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.567] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.592] Chunk #1 of 2 ... DONE [15:31:42.593] Chunk #2 of 2 ... [15:31:42.593] - Finding globals in 'X' for chunk #2 ... [15:31:42.594] + additional globals found: [n=0] [15:31:42.595] + additional namespaces needed: [n=0] [15:31:42.595] - Finding globals in 'X' for chunk #2 ... DONE [15:31:42.596] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.596] - seeds: [15:31:42.596] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.627] Created future: [15:31:42.628] MultisessionFuture: [15:31:42.628] Label: 'future_lapply-2' [15:31:42.628] Expression: [15:31:42.628] { [15:31:42.628] do.call(function(...) { [15:31:42.628] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.628] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.628] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.628] on.exit(options(oopts), add = TRUE) [15:31:42.628] } [15:31:42.628] { [15:31:42.628] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.628] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.628] ...future.FUN(...future.X_jj, ...) [15:31:42.628] }) [15:31:42.628] } [15:31:42.628] }, args = future.call.arguments) [15:31:42.628] } [15:31:42.628] Lazy evaluation: FALSE [15:31:42.628] Asynchronous evaluation: TRUE [15:31:42.628] Local evaluation: TRUE [15:31:42.628] Environment: 0x000001e531534ff0 [15:31:42.628] Capture standard output: TRUE [15:31:42.628] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.628] 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) [15:31:42.628] Packages: [15:31:42.628] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.628] Resolved: TRUE [15:31:42.628] Value: [15:31:42.628] Conditions captured: [15:31:42.628] Early signaling: FALSE [15:31:42.628] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.628] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.657] Chunk #2 of 2 ... DONE [15:31:42.658] Launching 2 futures (chunks) ... DONE [15:31:42.658] Resolving 2 futures (chunks) ... [15:31:42.660] - Number of value chunks collected: 2 [15:31:42.661] Resolving 2 futures (chunks) ... DONE [15:31:42.661] Reducing values from 2 chunks ... [15:31:42.661] - Number of values collected after concatenation: 2 [15:31:42.662] - Number of values expected: 2 [15:31:42.662] Reducing values from 2 chunks ... DONE [15:31:42.662] 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)) [15:31:42.664] future_lapply() ... [15:31:42.669] Number of chunks: 2 [15:31:42.670] getGlobalsAndPackagesXApply() ... [15:31:42.670] - future.globals: TRUE [15:31:42.673] - globals found/used: [n=1] 'FUN' [15:31:42.673] - needed namespaces: [n=0] [15:31:42.673] Finding globals ... DONE [15:31:42.674] - use_args: TRUE [15:31:42.674] - Getting '...' globals ... [15:31:42.674] - '...' content: [n=0] [15:31:42.675] List of 1 [15:31:42.675] $ ...: list() [15:31:42.675] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.675] - attr(*, "where")=List of 1 [15:31:42.675] ..$ ...: [15:31:42.675] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.675] - attr(*, "resolved")= logi TRUE [15:31:42.675] - attr(*, "total_size")= num NA [15:31:42.678] - Getting '...' globals ... DONE [15:31:42.679] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:42.679] List of 2 [15:31:42.679] $ ...future.FUN:function (y) [15:31:42.679] $ ... : list() [15:31:42.679] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.679] - attr(*, "where")=List of 2 [15:31:42.679] ..$ ...future.FUN: [15:31:42.679] ..$ ... : [15:31:42.679] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.679] - attr(*, "resolved")= logi FALSE [15:31:42.679] - attr(*, "total_size")= num 280 [15:31:42.684] Packages to be attached in all futures: [n=0] [15:31:42.684] getGlobalsAndPackagesXApply() ... DONE [15:31:42.685] Number of futures (= number of chunks): 2 [15:31:42.685] Launching 2 futures (chunks) ... [15:31:42.685] Chunk #1 of 2 ... [15:31:42.685] - Finding globals in 'X' for chunk #1 ... [15:31:42.686] + additional globals found: [n=0] [15:31:42.686] + additional namespaces needed: [n=0] [15:31:42.686] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.686] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.687] - seeds: [15:31:42.687] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.712] Created future: [15:31:42.712] MultisessionFuture: [15:31:42.712] Label: 'future_lapply-1' [15:31:42.712] Expression: [15:31:42.712] { [15:31:42.712] do.call(function(...) { [15:31:42.712] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.712] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.712] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.712] on.exit(options(oopts), add = TRUE) [15:31:42.712] } [15:31:42.712] { [15:31:42.712] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.712] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.712] ...future.FUN(...future.X_jj, ...) [15:31:42.712] }) [15:31:42.712] } [15:31:42.712] }, args = future.call.arguments) [15:31:42.712] } [15:31:42.712] Lazy evaluation: FALSE [15:31:42.712] Asynchronous evaluation: TRUE [15:31:42.712] Local evaluation: TRUE [15:31:42.712] Environment: 0x000001e531e48418 [15:31:42.712] Capture standard output: TRUE [15:31:42.712] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.712] 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) [15:31:42.712] Packages: [15:31:42.712] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.712] Resolved: TRUE [15:31:42.712] Value: [15:31:42.712] Conditions captured: [15:31:42.712] Early signaling: FALSE [15:31:42.712] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.712] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.744] Chunk #1 of 2 ... DONE [15:31:42.744] Chunk #2 of 2 ... [15:31:42.744] - Finding globals in 'X' for chunk #2 ... [15:31:42.745] + additional globals found: [n=0] [15:31:42.745] + additional namespaces needed: [n=0] [15:31:42.746] - Finding globals in 'X' for chunk #2 ... DONE [15:31:42.746] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.746] - seeds: [15:31:42.747] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.787] Created future: [15:31:42.787] MultisessionFuture: [15:31:42.787] Label: 'future_lapply-2' [15:31:42.787] Expression: [15:31:42.787] { [15:31:42.787] do.call(function(...) { [15:31:42.787] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.787] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.787] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.787] on.exit(options(oopts), add = TRUE) [15:31:42.787] } [15:31:42.787] { [15:31:42.787] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.787] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.787] ...future.FUN(...future.X_jj, ...) [15:31:42.787] }) [15:31:42.787] } [15:31:42.787] }, args = future.call.arguments) [15:31:42.787] } [15:31:42.787] Lazy evaluation: FALSE [15:31:42.787] Asynchronous evaluation: TRUE [15:31:42.787] Local evaluation: TRUE [15:31:42.787] Environment: 0x000001e531e48418 [15:31:42.787] Capture standard output: TRUE [15:31:42.787] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.787] 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) [15:31:42.787] Packages: [15:31:42.787] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.787] Resolved: TRUE [15:31:42.787] Value: [15:31:42.787] Conditions captured: [15:31:42.787] Early signaling: FALSE [15:31:42.787] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.787] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.810] Chunk #2 of 2 ... DONE [15:31:42.810] Launching 2 futures (chunks) ... DONE [15:31:42.810] Resolving 2 futures (chunks) ... [15:31:42.812] - Number of value chunks collected: 2 [15:31:42.812] Resolving 2 futures (chunks) ... DONE [15:31:42.812] Reducing values from 2 chunks ... [15:31:42.813] - Number of values collected after concatenation: 2 [15:31:42.813] - Number of values expected: 2 [15:31:42.813] Reducing values from 2 chunks ... DONE [15:31:42.813] 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) [15:31:42.816] future_lapply() ... [15:31:42.820] Number of chunks: 2 [15:31:42.820] getGlobalsAndPackagesXApply() ... [15:31:42.820] - future.globals: TRUE [15:31:42.823] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > res <- NULL > options(future.globals.maxSize = oMaxSize) > > maxSize <- getOption("future.globals.maxSize") > y <- future_lapply(X, FUN = FUN) [15:31:42.823] future_lapply() ... [15:31:42.826] Number of chunks: 2 [15:31:42.826] getGlobalsAndPackagesXApply() ... [15:31:42.826] - future.globals: TRUE [15:31:42.828] - globals found/used: [n=1] 'FUN' [15:31:42.829] - needed namespaces: [n=0] [15:31:42.829] Finding globals ... DONE [15:31:42.829] - use_args: TRUE [15:31:42.829] - Getting '...' globals ... [15:31:42.830] - '...' content: [n=0] [15:31:42.830] List of 1 [15:31:42.830] $ ...: list() [15:31:42.830] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.830] - attr(*, "where")=List of 1 [15:31:42.830] ..$ ...: [15:31:42.830] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.830] - attr(*, "resolved")= logi TRUE [15:31:42.830] - attr(*, "total_size")= num NA [15:31:42.833] - Getting '...' globals ... DONE [15:31:42.833] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:42.833] List of 2 [15:31:42.833] $ ...future.FUN:function (x) [15:31:42.833] $ ... : list() [15:31:42.833] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.833] - attr(*, "where")=List of 2 [15:31:42.833] ..$ ...future.FUN: [15:31:42.833] ..$ ... : [15:31:42.833] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.833] - attr(*, "resolved")= logi FALSE [15:31:42.833] - attr(*, "total_size")= num 1840 [15:31:42.837] Packages to be attached in all futures: [n=0] [15:31:42.837] getGlobalsAndPackagesXApply() ... DONE [15:31:42.837] Number of futures (= number of chunks): 2 [15:31:42.838] Launching 2 futures (chunks) ... [15:31:42.838] Chunk #1 of 2 ... [15:31:42.838] - Finding globals in 'X' for chunk #1 ... [15:31:42.838] + additional globals found: [n=0] [15:31:42.839] + additional namespaces needed: [n=0] [15:31:42.839] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.839] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.839] - seeds: [15:31:42.839] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.858] Created future: [15:31:42.859] MultisessionFuture: [15:31:42.859] Label: 'future_lapply-1' [15:31:42.859] Expression: [15:31:42.859] { [15:31:42.859] do.call(function(...) { [15:31:42.859] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.859] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.859] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.859] on.exit(options(oopts), add = TRUE) [15:31:42.859] } [15:31:42.859] { [15:31:42.859] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.859] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.859] ...future.FUN(...future.X_jj, ...) [15:31:42.859] }) [15:31:42.859] } [15:31:42.859] }, args = future.call.arguments) [15:31:42.859] } [15:31:42.859] Lazy evaluation: FALSE [15:31:42.859] Asynchronous evaluation: TRUE [15:31:42.859] Local evaluation: TRUE [15:31:42.859] Environment: R_GlobalEnv [15:31:42.859] Capture standard output: TRUE [15:31:42.859] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.859] 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) [15:31:42.859] Packages: [15:31:42.859] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.859] Resolved: TRUE [15:31:42.859] Value: [15:31:42.859] Conditions captured: [15:31:42.859] Early signaling: FALSE [15:31:42.859] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.859] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.884] Chunk #1 of 2 ... DONE [15:31:42.884] Chunk #2 of 2 ... [15:31:42.884] - Finding globals in 'X' for chunk #2 ... [15:31:42.885] + additional globals found: [n=0] [15:31:42.885] + additional namespaces needed: [n=0] [15:31:42.885] - Finding globals in 'X' for chunk #2 ... DONE [15:31:42.885] - Adjusted option 'future.globals.maxSize': 524288000 -> 2 * 524288000 = 1048576000 (bytes) [15:31:42.885] - seeds: [15:31:42.886] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.904] Created future: [15:31:42.905] MultisessionFuture: [15:31:42.905] Label: 'future_lapply-2' [15:31:42.905] Expression: [15:31:42.905] { [15:31:42.905] do.call(function(...) { [15:31:42.905] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.905] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.905] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.905] on.exit(options(oopts), add = TRUE) [15:31:42.905] } [15:31:42.905] { [15:31:42.905] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.905] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.905] ...future.FUN(...future.X_jj, ...) [15:31:42.905] }) [15:31:42.905] } [15:31:42.905] }, args = future.call.arguments) [15:31:42.905] } [15:31:42.905] Lazy evaluation: FALSE [15:31:42.905] Asynchronous evaluation: TRUE [15:31:42.905] Local evaluation: TRUE [15:31:42.905] Environment: R_GlobalEnv [15:31:42.905] Capture standard output: TRUE [15:31:42.905] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.905] 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) [15:31:42.905] Packages: [15:31:42.905] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.905] Resolved: TRUE [15:31:42.905] Value: [15:31:42.905] Conditions captured: [15:31:42.905] Early signaling: FALSE [15:31:42.905] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.905] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:42.924] Chunk #2 of 2 ... DONE [15:31:42.924] Launching 2 futures (chunks) ... DONE [15:31:42.924] Resolving 2 futures (chunks) ... [15:31:42.926] - Number of value chunks collected: 2 [15:31:42.926] Resolving 2 futures (chunks) ... DONE [15:31:42.926] Reducing values from 2 chunks ... [15:31:42.926] - Number of values collected after concatenation: 10 [15:31:42.926] - Number of values expected: 10 [15:31:42.927] Reducing values from 2 chunks ... DONE [15:31:42.927] 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) + } [15:31:42.939] future_lapply() ... [15:31:42.942] Number of chunks: 10 [15:31:42.943] getGlobalsAndPackagesXApply() ... [15:31:42.943] - future.globals: TRUE [15:31:42.945] - globals found/used: [n=1] 'FUN' [15:31:42.946] - needed namespaces: [n=0] [15:31:42.946] Finding globals ... DONE [15:31:42.946] - use_args: TRUE [15:31:42.946] - Getting '...' globals ... [15:31:42.947] - '...' content: [n=0] [15:31:42.947] List of 1 [15:31:42.947] $ ...: list() [15:31:42.947] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.947] - attr(*, "where")=List of 1 [15:31:42.947] ..$ ...: [15:31:42.947] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.947] - attr(*, "resolved")= logi TRUE [15:31:42.947] - attr(*, "total_size")= num NA [15:31:42.954] - Getting '...' globals ... DONE [15:31:42.955] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:42.955] List of 2 [15:31:42.955] $ ...future.FUN:function (x) [15:31:42.955] $ ... : list() [15:31:42.955] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:42.955] - attr(*, "where")=List of 2 [15:31:42.955] ..$ ...future.FUN: [15:31:42.955] ..$ ... : [15:31:42.955] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:42.955] - attr(*, "resolved")= logi FALSE [15:31:42.955] - attr(*, "total_size")= num 1840 [15:31:42.961] Packages to be attached in all futures: [n=0] [15:31:42.961] getGlobalsAndPackagesXApply() ... DONE [15:31:42.962] Number of futures (= number of chunks): 10 [15:31:42.962] Launching 10 futures (chunks) ... [15:31:42.962] Chunk #1 of 10 ... [15:31:42.963] - Finding globals in 'X' for chunk #1 ... [15:31:42.963] + additional globals found: [n=0] [15:31:42.964] + additional namespaces needed: [n=0] [15:31:42.964] - Finding globals in 'X' for chunk #1 ... DONE [15:31:42.965] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:42.965] - seeds: [15:31:42.965] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:42.990] Created future: [15:31:42.990] MultisessionFuture: [15:31:42.990] Label: 'future_lapply-1' [15:31:42.990] Expression: [15:31:42.990] { [15:31:42.990] do.call(function(...) { [15:31:42.990] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:42.990] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:42.990] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:42.990] on.exit(options(oopts), add = TRUE) [15:31:42.990] } [15:31:42.990] { [15:31:42.990] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:42.990] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:42.990] ...future.FUN(...future.X_jj, ...) [15:31:42.990] }) [15:31:42.990] } [15:31:42.990] }, args = future.call.arguments) [15:31:42.990] } [15:31:42.990] Lazy evaluation: FALSE [15:31:42.990] Asynchronous evaluation: TRUE [15:31:42.990] Local evaluation: TRUE [15:31:42.990] Environment: R_GlobalEnv [15:31:42.990] Capture standard output: TRUE [15:31:42.990] Capture condition classes: 'condition' (excluding 'nothing') [15:31:42.990] 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) [15:31:42.990] Packages: [15:31:42.990] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:42.990] Resolved: TRUE [15:31:42.990] Value: [15:31:42.990] Conditions captured: [15:31:42.990] Early signaling: FALSE [15:31:42.990] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:42.990] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.021] Chunk #1 of 10 ... DONE [15:31:43.021] Chunk #2 of 10 ... [15:31:43.021] - Finding globals in 'X' for chunk #2 ... [15:31:43.022] + additional globals found: [n=0] [15:31:43.022] + additional namespaces needed: [n=0] [15:31:43.022] - Finding globals in 'X' for chunk #2 ... DONE [15:31:43.023] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.023] - seeds: [15:31:43.023] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.049] Created future: [15:31:43.049] MultisessionFuture: [15:31:43.049] Label: 'future_lapply-2' [15:31:43.049] Expression: [15:31:43.049] { [15:31:43.049] do.call(function(...) { [15:31:43.049] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.049] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.049] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.049] on.exit(options(oopts), add = TRUE) [15:31:43.049] } [15:31:43.049] { [15:31:43.049] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.049] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.049] ...future.FUN(...future.X_jj, ...) [15:31:43.049] }) [15:31:43.049] } [15:31:43.049] }, args = future.call.arguments) [15:31:43.049] } [15:31:43.049] Lazy evaluation: FALSE [15:31:43.049] Asynchronous evaluation: TRUE [15:31:43.049] Local evaluation: TRUE [15:31:43.049] Environment: R_GlobalEnv [15:31:43.049] Capture standard output: TRUE [15:31:43.049] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.049] 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) [15:31:43.049] Packages: [15:31:43.049] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.049] Resolved: TRUE [15:31:43.049] Value: [15:31:43.049] Conditions captured: [15:31:43.049] Early signaling: FALSE [15:31:43.049] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.049] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.078] Chunk #2 of 10 ... DONE [15:31:43.078] Chunk #3 of 10 ... [15:31:43.079] - Finding globals in 'X' for chunk #3 ... [15:31:43.079] + additional globals found: [n=0] [15:31:43.079] + additional namespaces needed: [n=0] [15:31:43.080] - Finding globals in 'X' for chunk #3 ... DONE [15:31:43.080] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.080] - seeds: [15:31:43.080] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.101] Created future: [15:31:43.101] MultisessionFuture: [15:31:43.101] Label: 'future_lapply-3' [15:31:43.101] Expression: [15:31:43.101] { [15:31:43.101] do.call(function(...) { [15:31:43.101] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.101] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.101] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.101] on.exit(options(oopts), add = TRUE) [15:31:43.101] } [15:31:43.101] { [15:31:43.101] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.101] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.101] ...future.FUN(...future.X_jj, ...) [15:31:43.101] }) [15:31:43.101] } [15:31:43.101] }, args = future.call.arguments) [15:31:43.101] } [15:31:43.101] Lazy evaluation: FALSE [15:31:43.101] Asynchronous evaluation: TRUE [15:31:43.101] Local evaluation: TRUE [15:31:43.101] Environment: R_GlobalEnv [15:31:43.101] Capture standard output: TRUE [15:31:43.101] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.101] 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) [15:31:43.101] Packages: [15:31:43.101] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.101] Resolved: TRUE [15:31:43.101] Value: [15:31:43.101] Conditions captured: [15:31:43.101] Early signaling: FALSE [15:31:43.101] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.101] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.120] Chunk #3 of 10 ... DONE [15:31:43.121] Chunk #4 of 10 ... [15:31:43.121] - Finding globals in 'X' for chunk #4 ... [15:31:43.122] + additional globals found: [n=0] [15:31:43.122] + additional namespaces needed: [n=0] [15:31:43.123] - Finding globals in 'X' for chunk #4 ... DONE [15:31:43.123] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.123] - seeds: [15:31:43.124] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.154] Created future: [15:31:43.154] MultisessionFuture: [15:31:43.154] Label: 'future_lapply-4' [15:31:43.154] Expression: [15:31:43.154] { [15:31:43.154] do.call(function(...) { [15:31:43.154] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.154] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.154] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.154] on.exit(options(oopts), add = TRUE) [15:31:43.154] } [15:31:43.154] { [15:31:43.154] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.154] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.154] ...future.FUN(...future.X_jj, ...) [15:31:43.154] }) [15:31:43.154] } [15:31:43.154] }, args = future.call.arguments) [15:31:43.154] } [15:31:43.154] Lazy evaluation: FALSE [15:31:43.154] Asynchronous evaluation: TRUE [15:31:43.154] Local evaluation: TRUE [15:31:43.154] Environment: R_GlobalEnv [15:31:43.154] Capture standard output: TRUE [15:31:43.154] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.154] 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) [15:31:43.154] Packages: [15:31:43.154] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.154] Resolved: TRUE [15:31:43.154] Value: [15:31:43.154] Conditions captured: [15:31:43.154] Early signaling: FALSE [15:31:43.154] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.154] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.181] Chunk #4 of 10 ... DONE [15:31:43.181] Chunk #5 of 10 ... [15:31:43.181] - Finding globals in 'X' for chunk #5 ... [15:31:43.182] + additional globals found: [n=0] [15:31:43.182] + additional namespaces needed: [n=0] [15:31:43.183] - Finding globals in 'X' for chunk #5 ... DONE [15:31:43.183] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.183] - seeds: [15:31:43.183] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.207] Created future: [15:31:43.207] MultisessionFuture: [15:31:43.207] Label: 'future_lapply-5' [15:31:43.207] Expression: [15:31:43.207] { [15:31:43.207] do.call(function(...) { [15:31:43.207] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.207] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.207] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.207] on.exit(options(oopts), add = TRUE) [15:31:43.207] } [15:31:43.207] { [15:31:43.207] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.207] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.207] ...future.FUN(...future.X_jj, ...) [15:31:43.207] }) [15:31:43.207] } [15:31:43.207] }, args = future.call.arguments) [15:31:43.207] } [15:31:43.207] Lazy evaluation: FALSE [15:31:43.207] Asynchronous evaluation: TRUE [15:31:43.207] Local evaluation: TRUE [15:31:43.207] Environment: R_GlobalEnv [15:31:43.207] Capture standard output: TRUE [15:31:43.207] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.207] 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) [15:31:43.207] Packages: [15:31:43.207] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.207] Resolved: TRUE [15:31:43.207] Value: [15:31:43.207] Conditions captured: [15:31:43.207] Early signaling: FALSE [15:31:43.207] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.207] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.236] Chunk #5 of 10 ... DONE [15:31:43.237] Chunk #6 of 10 ... [15:31:43.237] - Finding globals in 'X' for chunk #6 ... [15:31:43.238] + additional globals found: [n=0] [15:31:43.238] + additional namespaces needed: [n=0] [15:31:43.238] - Finding globals in 'X' for chunk #6 ... DONE [15:31:43.238] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.239] - seeds: [15:31:43.239] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.262] Created future: [15:31:43.263] MultisessionFuture: [15:31:43.263] Label: 'future_lapply-6' [15:31:43.263] Expression: [15:31:43.263] { [15:31:43.263] do.call(function(...) { [15:31:43.263] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.263] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.263] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.263] on.exit(options(oopts), add = TRUE) [15:31:43.263] } [15:31:43.263] { [15:31:43.263] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.263] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.263] ...future.FUN(...future.X_jj, ...) [15:31:43.263] }) [15:31:43.263] } [15:31:43.263] }, args = future.call.arguments) [15:31:43.263] } [15:31:43.263] Lazy evaluation: FALSE [15:31:43.263] Asynchronous evaluation: TRUE [15:31:43.263] Local evaluation: TRUE [15:31:43.263] Environment: R_GlobalEnv [15:31:43.263] Capture standard output: TRUE [15:31:43.263] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.263] 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) [15:31:43.263] Packages: [15:31:43.263] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.263] Resolved: TRUE [15:31:43.263] Value: [15:31:43.263] Conditions captured: [15:31:43.263] Early signaling: FALSE [15:31:43.263] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.263] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.287] Chunk #6 of 10 ... DONE [15:31:43.287] Chunk #7 of 10 ... [15:31:43.288] - Finding globals in 'X' for chunk #7 ... [15:31:43.288] + additional globals found: [n=0] [15:31:43.288] + additional namespaces needed: [n=0] [15:31:43.289] - Finding globals in 'X' for chunk #7 ... DONE [15:31:43.289] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.289] - seeds: [15:31:43.289] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.319] Created future: [15:31:43.319] MultisessionFuture: [15:31:43.319] Label: 'future_lapply-7' [15:31:43.319] Expression: [15:31:43.319] { [15:31:43.319] do.call(function(...) { [15:31:43.319] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.319] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.319] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.319] on.exit(options(oopts), add = TRUE) [15:31:43.319] } [15:31:43.319] { [15:31:43.319] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.319] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.319] ...future.FUN(...future.X_jj, ...) [15:31:43.319] }) [15:31:43.319] } [15:31:43.319] }, args = future.call.arguments) [15:31:43.319] } [15:31:43.319] Lazy evaluation: FALSE [15:31:43.319] Asynchronous evaluation: TRUE [15:31:43.319] Local evaluation: TRUE [15:31:43.319] Environment: R_GlobalEnv [15:31:43.319] Capture standard output: TRUE [15:31:43.319] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.319] 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) [15:31:43.319] Packages: [15:31:43.319] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.319] Resolved: TRUE [15:31:43.319] Value: [15:31:43.319] Conditions captured: [15:31:43.319] Early signaling: FALSE [15:31:43.319] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.319] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.376] Chunk #7 of 10 ... DONE [15:31:43.376] Chunk #8 of 10 ... [15:31:43.376] - Finding globals in 'X' for chunk #8 ... [15:31:43.377] + additional globals found: [n=0] [15:31:43.378] + additional namespaces needed: [n=0] [15:31:43.378] - Finding globals in 'X' for chunk #8 ... DONE [15:31:43.378] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.379] - seeds: [15:31:43.379] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.403] Created future: [15:31:43.403] MultisessionFuture: [15:31:43.403] Label: 'future_lapply-8' [15:31:43.403] Expression: [15:31:43.403] { [15:31:43.403] do.call(function(...) { [15:31:43.403] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.403] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.403] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.403] on.exit(options(oopts), add = TRUE) [15:31:43.403] } [15:31:43.403] { [15:31:43.403] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.403] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.403] ...future.FUN(...future.X_jj, ...) [15:31:43.403] }) [15:31:43.403] } [15:31:43.403] }, args = future.call.arguments) [15:31:43.403] } [15:31:43.403] Lazy evaluation: FALSE [15:31:43.403] Asynchronous evaluation: TRUE [15:31:43.403] Local evaluation: TRUE [15:31:43.403] Environment: R_GlobalEnv [15:31:43.403] Capture standard output: TRUE [15:31:43.403] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.403] 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) [15:31:43.403] Packages: [15:31:43.403] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.403] Resolved: TRUE [15:31:43.403] Value: [15:31:43.403] Conditions captured: [15:31:43.403] Early signaling: FALSE [15:31:43.403] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.403] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.430] Chunk #8 of 10 ... DONE [15:31:43.430] Chunk #9 of 10 ... [15:31:43.430] - Finding globals in 'X' for chunk #9 ... [15:31:43.431] + additional globals found: [n=0] [15:31:43.431] + additional namespaces needed: [n=0] [15:31:43.431] - Finding globals in 'X' for chunk #9 ... DONE [15:31:43.431] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.432] - seeds: [15:31:43.432] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.453] Created future: [15:31:43.453] MultisessionFuture: [15:31:43.453] Label: 'future_lapply-9' [15:31:43.453] Expression: [15:31:43.453] { [15:31:43.453] do.call(function(...) { [15:31:43.453] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.453] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.453] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.453] on.exit(options(oopts), add = TRUE) [15:31:43.453] } [15:31:43.453] { [15:31:43.453] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.453] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.453] ...future.FUN(...future.X_jj, ...) [15:31:43.453] }) [15:31:43.453] } [15:31:43.453] }, args = future.call.arguments) [15:31:43.453] } [15:31:43.453] Lazy evaluation: FALSE [15:31:43.453] Asynchronous evaluation: TRUE [15:31:43.453] Local evaluation: TRUE [15:31:43.453] Environment: R_GlobalEnv [15:31:43.453] Capture standard output: TRUE [15:31:43.453] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.453] 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) [15:31:43.453] Packages: [15:31:43.453] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.453] Resolved: TRUE [15:31:43.453] Value: [15:31:43.453] Conditions captured: [15:31:43.453] Early signaling: FALSE [15:31:43.453] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.453] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.482] Chunk #9 of 10 ... DONE [15:31:43.482] Chunk #10 of 10 ... [15:31:43.482] - Finding globals in 'X' for chunk #10 ... [15:31:43.483] + additional globals found: [n=0] [15:31:43.483] + additional namespaces needed: [n=0] [15:31:43.484] - Finding globals in 'X' for chunk #10 ... DONE [15:31:43.484] - Adjusted option 'future.globals.maxSize': 2306 -> 10 * 2306 = 23056 (bytes) [15:31:43.484] - seeds: [15:31:43.484] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.508] Created future: [15:31:43.508] MultisessionFuture: [15:31:43.508] Label: 'future_lapply-10' [15:31:43.508] Expression: [15:31:43.508] { [15:31:43.508] do.call(function(...) { [15:31:43.508] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.508] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.508] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.508] on.exit(options(oopts), add = TRUE) [15:31:43.508] } [15:31:43.508] { [15:31:43.508] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.508] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.508] ...future.FUN(...future.X_jj, ...) [15:31:43.508] }) [15:31:43.508] } [15:31:43.508] }, args = future.call.arguments) [15:31:43.508] } [15:31:43.508] Lazy evaluation: FALSE [15:31:43.508] Asynchronous evaluation: TRUE [15:31:43.508] Local evaluation: TRUE [15:31:43.508] Environment: R_GlobalEnv [15:31:43.508] Capture standard output: TRUE [15:31:43.508] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.508] 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) [15:31:43.508] Packages: [15:31:43.508] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.508] Resolved: TRUE [15:31:43.508] Value: [15:31:43.508] Conditions captured: [15:31:43.508] Early signaling: FALSE [15:31:43.508] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.508] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.533] Chunk #10 of 10 ... DONE [15:31:43.534] Launching 10 futures (chunks) ... DONE [15:31:43.534] Resolving 10 futures (chunks) ... [15:31:43.540] - Number of value chunks collected: 10 [15:31:43.540] Resolving 10 futures (chunks) ... DONE [15:31:43.540] Reducing values from 10 chunks ... [15:31:43.540] - Number of values collected after concatenation: 10 [15:31:43.541] - Number of values expected: 10 [15:31:43.541] Reducing values from 10 chunks ... DONE [15:31:43.541] 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 [15:31:43.548] future_lapply() ... [15:31:43.553] Number of chunks: 5 [15:31:43.553] getGlobalsAndPackagesXApply() ... [15:31:43.553] - future.globals: TRUE [15:31:43.556] - globals found/used: [n=1] 'FUN' [15:31:43.557] - needed namespaces: [n=0] [15:31:43.557] Finding globals ... DONE [15:31:43.557] - use_args: TRUE [15:31:43.557] - Getting '...' globals ... [15:31:43.558] - '...' content: [n=0] [15:31:43.558] List of 1 [15:31:43.558] $ ...: list() [15:31:43.558] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:43.558] - attr(*, "where")=List of 1 [15:31:43.558] ..$ ...: [15:31:43.558] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:43.558] - attr(*, "resolved")= logi TRUE [15:31:43.558] - attr(*, "total_size")= num NA [15:31:43.563] - Getting '...' globals ... DONE [15:31:43.563] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:43.564] List of 2 [15:31:43.564] $ ...future.FUN:function (x) [15:31:43.564] $ ... : list() [15:31:43.564] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:43.564] - attr(*, "where")=List of 2 [15:31:43.564] ..$ ...future.FUN: [15:31:43.564] ..$ ... : [15:31:43.564] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:43.564] - attr(*, "resolved")= logi FALSE [15:31:43.564] - attr(*, "total_size")= num 1840 [15:31:43.568] Packages to be attached in all futures: [n=0] [15:31:43.569] getGlobalsAndPackagesXApply() ... DONE [15:31:43.569] Number of futures (= number of chunks): 5 [15:31:43.570] Launching 5 futures (chunks) ... [15:31:43.570] Chunk #1 of 5 ... [15:31:43.570] - Finding globals in 'X' for chunk #1 ... [15:31:43.571] + additional globals found: [n=0] [15:31:43.571] + additional namespaces needed: [n=0] [15:31:43.571] - Finding globals in 'X' for chunk #1 ... DONE [15:31:43.572] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [15:31:43.572] - seeds: [15:31:43.572] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.599] Created future: [15:31:43.600] MultisessionFuture: [15:31:43.600] Label: 'future_lapply-1' [15:31:43.600] Expression: [15:31:43.600] { [15:31:43.600] do.call(function(...) { [15:31:43.600] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.600] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.600] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.600] on.exit(options(oopts), add = TRUE) [15:31:43.600] } [15:31:43.600] { [15:31:43.600] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.600] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.600] ...future.FUN(...future.X_jj, ...) [15:31:43.600] }) [15:31:43.600] } [15:31:43.600] }, args = future.call.arguments) [15:31:43.600] } [15:31:43.600] Lazy evaluation: FALSE [15:31:43.600] Asynchronous evaluation: TRUE [15:31:43.600] Local evaluation: TRUE [15:31:43.600] Environment: R_GlobalEnv [15:31:43.600] Capture standard output: TRUE [15:31:43.600] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.600] 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) [15:31:43.600] Packages: [15:31:43.600] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.600] Resolved: TRUE [15:31:43.600] Value: [15:31:43.600] Conditions captured: [15:31:43.600] Early signaling: FALSE [15:31:43.600] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.600] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.627] Chunk #1 of 5 ... DONE [15:31:43.627] Chunk #2 of 5 ... [15:31:43.627] - Finding globals in 'X' for chunk #2 ... [15:31:43.628] + additional globals found: [n=0] [15:31:43.628] + additional namespaces needed: [n=0] [15:31:43.629] - Finding globals in 'X' for chunk #2 ... DONE [15:31:43.629] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [15:31:43.629] - seeds: [15:31:43.629] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.666] Created future: [15:31:43.666] MultisessionFuture: [15:31:43.666] Label: 'future_lapply-2' [15:31:43.666] Expression: [15:31:43.666] { [15:31:43.666] do.call(function(...) { [15:31:43.666] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.666] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.666] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.666] on.exit(options(oopts), add = TRUE) [15:31:43.666] } [15:31:43.666] { [15:31:43.666] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.666] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.666] ...future.FUN(...future.X_jj, ...) [15:31:43.666] }) [15:31:43.666] } [15:31:43.666] }, args = future.call.arguments) [15:31:43.666] } [15:31:43.666] Lazy evaluation: FALSE [15:31:43.666] Asynchronous evaluation: TRUE [15:31:43.666] Local evaluation: TRUE [15:31:43.666] Environment: R_GlobalEnv [15:31:43.666] Capture standard output: TRUE [15:31:43.666] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.666] 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) [15:31:43.666] Packages: [15:31:43.666] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.666] Resolved: TRUE [15:31:43.666] Value: [15:31:43.666] Conditions captured: [15:31:43.666] Early signaling: FALSE [15:31:43.666] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.666] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.693] Chunk #2 of 5 ... DONE [15:31:43.694] Chunk #3 of 5 ... [15:31:43.694] - Finding globals in 'X' for chunk #3 ... [15:31:43.695] + additional globals found: [n=0] [15:31:43.695] + additional namespaces needed: [n=0] [15:31:43.695] - Finding globals in 'X' for chunk #3 ... DONE [15:31:43.696] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [15:31:43.696] - seeds: [15:31:43.696] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.719] Created future: [15:31:43.720] MultisessionFuture: [15:31:43.720] Label: 'future_lapply-3' [15:31:43.720] Expression: [15:31:43.720] { [15:31:43.720] do.call(function(...) { [15:31:43.720] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.720] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.720] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.720] on.exit(options(oopts), add = TRUE) [15:31:43.720] } [15:31:43.720] { [15:31:43.720] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.720] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.720] ...future.FUN(...future.X_jj, ...) [15:31:43.720] }) [15:31:43.720] } [15:31:43.720] }, args = future.call.arguments) [15:31:43.720] } [15:31:43.720] Lazy evaluation: FALSE [15:31:43.720] Asynchronous evaluation: TRUE [15:31:43.720] Local evaluation: TRUE [15:31:43.720] Environment: R_GlobalEnv [15:31:43.720] Capture standard output: TRUE [15:31:43.720] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.720] 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) [15:31:43.720] Packages: [15:31:43.720] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.720] Resolved: TRUE [15:31:43.720] Value: [15:31:43.720] Conditions captured: [15:31:43.720] Early signaling: FALSE [15:31:43.720] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.720] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.748] Chunk #3 of 5 ... DONE [15:31:43.749] Chunk #4 of 5 ... [15:31:43.749] - Finding globals in 'X' for chunk #4 ... [15:31:43.750] + additional globals found: [n=0] [15:31:43.750] + additional namespaces needed: [n=0] [15:31:43.750] - Finding globals in 'X' for chunk #4 ... DONE [15:31:43.750] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [15:31:43.751] - seeds: [15:31:43.751] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.775] Created future: [15:31:43.775] MultisessionFuture: [15:31:43.775] Label: 'future_lapply-4' [15:31:43.775] Expression: [15:31:43.775] { [15:31:43.775] do.call(function(...) { [15:31:43.775] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.775] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.775] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.775] on.exit(options(oopts), add = TRUE) [15:31:43.775] } [15:31:43.775] { [15:31:43.775] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.775] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.775] ...future.FUN(...future.X_jj, ...) [15:31:43.775] }) [15:31:43.775] } [15:31:43.775] }, args = future.call.arguments) [15:31:43.775] } [15:31:43.775] Lazy evaluation: FALSE [15:31:43.775] Asynchronous evaluation: TRUE [15:31:43.775] Local evaluation: TRUE [15:31:43.775] Environment: R_GlobalEnv [15:31:43.775] Capture standard output: TRUE [15:31:43.775] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.775] 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) [15:31:43.775] Packages: [15:31:43.775] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.775] Resolved: TRUE [15:31:43.775] Value: [15:31:43.775] Conditions captured: [15:31:43.775] Early signaling: FALSE [15:31:43.775] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.775] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.795] Chunk #4 of 5 ... DONE [15:31:43.795] Chunk #5 of 5 ... [15:31:43.796] - Finding globals in 'X' for chunk #5 ... [15:31:43.796] + additional globals found: [n=0] [15:31:43.796] + additional namespaces needed: [n=0] [15:31:43.797] - Finding globals in 'X' for chunk #5 ... DONE [15:31:43.797] - Adjusted option 'future.globals.maxSize': 2306 -> 5 * 2306 = 11528 (bytes) [15:31:43.797] - seeds: [15:31:43.797] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.819] Created future: [15:31:43.819] MultisessionFuture: [15:31:43.819] Label: 'future_lapply-5' [15:31:43.819] Expression: [15:31:43.819] { [15:31:43.819] do.call(function(...) { [15:31:43.819] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.819] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.819] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.819] on.exit(options(oopts), add = TRUE) [15:31:43.819] } [15:31:43.819] { [15:31:43.819] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.819] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.819] ...future.FUN(...future.X_jj, ...) [15:31:43.819] }) [15:31:43.819] } [15:31:43.819] }, args = future.call.arguments) [15:31:43.819] } [15:31:43.819] Lazy evaluation: FALSE [15:31:43.819] Asynchronous evaluation: TRUE [15:31:43.819] Local evaluation: TRUE [15:31:43.819] Environment: R_GlobalEnv [15:31:43.819] Capture standard output: TRUE [15:31:43.819] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.819] 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) [15:31:43.819] Packages: [15:31:43.819] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.819] Resolved: TRUE [15:31:43.819] Value: [15:31:43.819] Conditions captured: [15:31:43.819] Early signaling: FALSE [15:31:43.819] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.819] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.847] Chunk #5 of 5 ... DONE [15:31:43.848] Launching 5 futures (chunks) ... DONE [15:31:43.848] Resolving 5 futures (chunks) ... [15:31:43.851] - Number of value chunks collected: 5 [15:31:43.851] Resolving 5 futures (chunks) ... DONE [15:31:43.851] Reducing values from 5 chunks ... [15:31:43.852] - Number of values collected after concatenation: 10 [15:31:43.852] - Number of values expected: 10 [15:31:43.852] Reducing values from 5 chunks ... DONE [15:31:43.852] 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 [15:31:43.857] future_lapply() ... [15:31:43.861] Number of chunks: 2 [15:31:43.861] getGlobalsAndPackagesXApply() ... [15:31:43.861] - future.globals: TRUE [15:31:43.864] - globals found/used: [n=1] 'FUN' [15:31:43.864] - needed namespaces: [n=0] [15:31:43.864] Finding globals ... DONE [15:31:43.865] - use_args: TRUE [15:31:43.865] - Getting '...' globals ... [15:31:43.865] - '...' content: [n=0] [15:31:43.866] List of 1 [15:31:43.866] $ ...: list() [15:31:43.866] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:43.866] - attr(*, "where")=List of 1 [15:31:43.866] ..$ ...: [15:31:43.866] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:43.866] - attr(*, "resolved")= logi TRUE [15:31:43.866] - attr(*, "total_size")= num NA [15:31:43.869] - Getting '...' globals ... DONE [15:31:43.869] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:43.869] List of 2 [15:31:43.869] $ ...future.FUN:function (x) [15:31:43.869] $ ... : list() [15:31:43.869] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:43.869] - attr(*, "where")=List of 2 [15:31:43.869] ..$ ...future.FUN: [15:31:43.869] ..$ ... : [15:31:43.869] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:43.869] - attr(*, "resolved")= logi FALSE [15:31:43.869] - attr(*, "total_size")= num 1840 [15:31:43.873] Packages to be attached in all futures: [n=0] [15:31:43.873] getGlobalsAndPackagesXApply() ... DONE [15:31:43.873] Number of futures (= number of chunks): 2 [15:31:43.873] Launching 2 futures (chunks) ... [15:31:43.874] Chunk #1 of 2 ... [15:31:43.874] - Finding globals in 'X' for chunk #1 ... [15:31:43.875] + additional globals found: [n=0] [15:31:43.875] + additional namespaces needed: [n=0] [15:31:43.875] - Finding globals in 'X' for chunk #1 ... DONE [15:31:43.876] - Adjusted option 'future.globals.maxSize': 2306 -> 2 * 2306 = 4611 (bytes) [15:31:43.876] - seeds: [15:31:43.876] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.897] Created future: [15:31:43.897] MultisessionFuture: [15:31:43.897] Label: 'future_lapply-1' [15:31:43.897] Expression: [15:31:43.897] { [15:31:43.897] do.call(function(...) { [15:31:43.897] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.897] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.897] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.897] on.exit(options(oopts), add = TRUE) [15:31:43.897] } [15:31:43.897] { [15:31:43.897] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.897] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.897] ...future.FUN(...future.X_jj, ...) [15:31:43.897] }) [15:31:43.897] } [15:31:43.897] }, args = future.call.arguments) [15:31:43.897] } [15:31:43.897] Lazy evaluation: FALSE [15:31:43.897] Asynchronous evaluation: TRUE [15:31:43.897] Local evaluation: TRUE [15:31:43.897] Environment: R_GlobalEnv [15:31:43.897] Capture standard output: TRUE [15:31:43.897] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.897] 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) [15:31:43.897] Packages: [15:31:43.897] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.897] Resolved: TRUE [15:31:43.897] Value: [15:31:43.897] Conditions captured: [15:31:43.897] Early signaling: FALSE [15:31:43.897] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.897] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.924] Chunk #1 of 2 ... DONE [15:31:43.924] Chunk #2 of 2 ... [15:31:43.925] - Finding globals in 'X' for chunk #2 ... [15:31:43.926] + additional globals found: [n=0] [15:31:43.926] + additional namespaces needed: [n=0] [15:31:43.926] - Finding globals in 'X' for chunk #2 ... DONE [15:31:43.926] - Adjusted option 'future.globals.maxSize': 2306 -> 2 * 2306 = 4611 (bytes) [15:31:43.927] - seeds: [15:31:43.927] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:43.961] Created future: [15:31:43.962] MultisessionFuture: [15:31:43.962] Label: 'future_lapply-2' [15:31:43.962] Expression: [15:31:43.962] { [15:31:43.962] do.call(function(...) { [15:31:43.962] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:43.962] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:43.962] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:43.962] on.exit(options(oopts), add = TRUE) [15:31:43.962] } [15:31:43.962] { [15:31:43.962] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:43.962] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:43.962] ...future.FUN(...future.X_jj, ...) [15:31:43.962] }) [15:31:43.962] } [15:31:43.962] }, args = future.call.arguments) [15:31:43.962] } [15:31:43.962] Lazy evaluation: FALSE [15:31:43.962] Asynchronous evaluation: TRUE [15:31:43.962] Local evaluation: TRUE [15:31:43.962] Environment: R_GlobalEnv [15:31:43.962] Capture standard output: TRUE [15:31:43.962] Capture condition classes: 'condition' (excluding 'nothing') [15:31:43.962] 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) [15:31:43.962] Packages: [15:31:43.962] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:43.962] Resolved: TRUE [15:31:43.962] Value: [15:31:43.962] Conditions captured: [15:31:43.962] Early signaling: FALSE [15:31:43.962] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:43.962] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:43.993] Chunk #2 of 2 ... DONE [15:31:43.994] Launching 2 futures (chunks) ... DONE [15:31:43.994] Resolving 2 futures (chunks) ... [15:31:43.996] - Number of value chunks collected: 2 [15:31:43.996] Resolving 2 futures (chunks) ... DONE [15:31:43.996] Reducing values from 2 chunks ... [15:31:43.996] - Number of values collected after concatenation: 10 [15:31:43.997] - Number of values expected: 10 [15:31:43.997] Reducing values from 2 chunks ... DONE [15:31:43.997] 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 [15:31:44.004] future_lapply() ... [15:31:44.009] Number of chunks: 1 [15:31:44.009] getGlobalsAndPackagesXApply() ... [15:31:44.009] - future.globals: TRUE [15:31:44.013] - globals found/used: [n=1] 'FUN' [15:31:44.013] - needed namespaces: [n=0] [15:31:44.014] Finding globals ... DONE [15:31:44.014] - use_args: TRUE [15:31:44.014] - Getting '...' globals ... [15:31:44.015] - '...' content: [n=0] [15:31:44.015] List of 1 [15:31:44.015] $ ...: list() [15:31:44.015] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:44.015] - attr(*, "where")=List of 1 [15:31:44.015] ..$ ...: [15:31:44.015] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:44.015] - attr(*, "resolved")= logi TRUE [15:31:44.015] - attr(*, "total_size")= num NA [15:31:44.020] - Getting '...' globals ... DONE [15:31:44.020] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:44.021] List of 2 [15:31:44.021] $ ...future.FUN:function (x) [15:31:44.021] $ ... : list() [15:31:44.021] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:44.021] - attr(*, "where")=List of 2 [15:31:44.021] ..$ ...future.FUN: [15:31:44.021] ..$ ... : [15:31:44.021] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:44.021] - attr(*, "resolved")= logi FALSE [15:31:44.021] - attr(*, "total_size")= num 1840 [15:31:44.025] Packages to be attached in all futures: [n=0] [15:31:44.026] getGlobalsAndPackagesXApply() ... DONE [15:31:44.026] Number of futures (= number of chunks): 1 [15:31:44.026] Launching 1 futures (chunks) ... [15:31:44.027] Chunk #1 of 1 ... [15:31:44.027] - Finding globals in 'X' for chunk #1 ... [15:31:44.028] + additional globals found: [n=0] [15:31:44.028] + additional namespaces needed: [n=0] [15:31:44.028] - Finding globals in 'X' for chunk #1 ... DONE [15:31:44.029] - seeds: [15:31:44.029] - All globals exported: [n=5] '...future.FUN', '...', '...future.elements_ii', '...future.seeds_ii', '...future.globals.maxSize' [15:31:44.052] Created future: [15:31:44.052] MultisessionFuture: [15:31:44.052] Label: 'future_lapply-1' [15:31:44.052] Expression: [15:31:44.052] { [15:31:44.052] do.call(function(...) { [15:31:44.052] ...future.globals.maxSize.org <- getOption("future.globals.maxSize") [15:31:44.052] if (!identical(...future.globals.maxSize.org, ...future.globals.maxSize)) { [15:31:44.052] oopts <- options(future.globals.maxSize = ...future.globals.maxSize) [15:31:44.052] on.exit(options(oopts), add = TRUE) [15:31:44.052] } [15:31:44.052] { [15:31:44.052] lapply(seq_along(...future.elements_ii), FUN = function(jj) { [15:31:44.052] ...future.X_jj <- ...future.elements_ii[[jj]] [15:31:44.052] ...future.FUN(...future.X_jj, ...) [15:31:44.052] }) [15:31:44.052] } [15:31:44.052] }, args = future.call.arguments) [15:31:44.052] } [15:31:44.052] Lazy evaluation: FALSE [15:31:44.052] Asynchronous evaluation: TRUE [15:31:44.052] Local evaluation: TRUE [15:31:44.052] Environment: R_GlobalEnv [15:31:44.052] Capture standard output: TRUE [15:31:44.052] Capture condition classes: 'condition' (excluding 'nothing') [15:31:44.052] 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) [15:31:44.052] Packages: [15:31:44.052] L'Ecuyer-CMRG RNG seed: (seed = FALSE) [15:31:44.052] Resolved: TRUE [15:31:44.052] Value: [15:31:44.052] Conditions captured: [15:31:44.052] Early signaling: FALSE [15:31:44.052] Owner process: 7c49a4da-d776-bc1d-037f-d60d716e0036 [15:31:44.052] Class: 'MultisessionFuture', 'ClusterFuture', 'MultiprocessFuture', 'Future', 'environment' [15:31:44.077] Chunk #1 of 1 ... DONE [15:31:44.077] Launching 1 futures (chunks) ... DONE [15:31:44.077] Resolving 1 futures (chunks) ... [15:31:44.078] - Number of value chunks collected: 1 [15:31:44.079] Resolving 1 futures (chunks) ... DONE [15:31:44.079] Reducing values from 1 chunks ... [15:31:44.079] - Number of values collected after concatenation: 10 [15:31:44.080] - Number of values expected: 10 [15:31:44.080] Reducing values from 1 chunks ... DONE [15:31:44.080] 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) [15:31:44.088] future_lapply() ... [15:31:44.092] Number of chunks: 1 [15:31:44.093] getGlobalsAndPackagesXApply() ... [15:31:44.093] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = list(1)) + }, error = identity) [15:31:44.094] future_lapply() ... [15:31:44.098] Number of chunks: 1 [15:31:44.098] getGlobalsAndPackagesXApply() ... [15:31:44.098] - future.globals: with names '1' [15:31:44.099] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = "...future.FUN") + }, error = identity) [15:31:44.099] future_lapply() ... [15:31:44.103] Number of chunks: 1 [15:31:44.104] getGlobalsAndPackagesXApply() ... [15:31:44.104] - future.globals: '...future.FUN' [15:31:44.105] - use_args: TRUE [15:31:44.105] getGlobalsAndPackagesXApply() ... DONE > stopifnot(inherits(res, "error")) > > res <- tryCatch({ + y <- future_lapply(1, FUN = function(x) x, future.globals = "...future.FUN") + }, error = identity) [15:31:44.106] future_lapply() ... [15:31:44.110] Number of chunks: 1 [15:31:44.110] getGlobalsAndPackagesXApply() ... [15:31:44.111] - future.globals: '...future.FUN' [15:31:44.111] - use_args: TRUE [15:31:44.111] 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) [15:31:44.112] future_lapply() ... [15:31:44.116] Number of chunks: 1 [15:31:44.117] getGlobalsAndPackagesXApply() ... [15:31:44.117] - future.globals: TRUE [15:31:44.120] - globals found/used: [n=1] 'FUN' [15:31:44.120] - needed namespaces: [n=0] [15:31:44.121] Finding globals ... DONE [15:31:44.121] - use_args: TRUE [15:31:44.121] - Getting '...' globals ... [15:31:44.122] - '...' content: [n=0] [15:31:44.122] List of 1 [15:31:44.122] $ ...: list() [15:31:44.122] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:44.122] - attr(*, "where")=List of 1 [15:31:44.122] ..$ ...: [15:31:44.122] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:44.122] - attr(*, "resolved")= logi TRUE [15:31:44.122] - attr(*, "total_size")= num NA [15:31:44.127] - Getting '...' globals ... DONE [15:31:44.128] Globals to be used in all futures (chunks): [n=2] '...future.FUN', '...' [15:31:44.128] List of 2 [15:31:44.128] $ ...future.FUN:function (f) [15:31:44.128] $ ... : list() [15:31:44.128] ..- attr(*, "class")= chr [1:2] "DotDotDotList" "list" [15:31:44.128] - attr(*, "where")=List of 2 [15:31:44.128] ..$ ...future.FUN: [15:31:44.128] ..$ ... : [15:31:44.128] - attr(*, "class")= chr [1:3] "FutureGlobals" "Globals" "list" [15:31:44.128] - attr(*, "resolved")= logi FALSE [15:31:44.128] - attr(*, "total_size")= num 336 [15:31:44.137] Packages to be attached in all futures: [n=0] [15:31:44.137] getGlobalsAndPackagesXApply() ... DONE [15:31:44.137] Number of futures (= number of chunks): 1 [15:31:44.138] Launching 1 futures (chunks) ... [15:31:44.138] Chunk #1 of 1 ... [15:31:44.138] - Finding globals in 'X' for chunk #1 ... [15:31:44.141] + additional globals found: [n=1] '...future.elements_ii' [15:31:44.141] + 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 3.23 0.31 6.09