R version 4.6.0 alpha (2026-04-01 r89771 ucrt) Copyright (C) 2026 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. > #! /usr/bin/env Rscript > ## This runs testme test script inst/testme/test-progressify-base.R > ## Don't edit - it was autogenerated by inst/testme/deploy.R > progressify:::testme("progressify-base") Test 'progressify-base' ... chr "none" > library(progressify) Loading required package: progressr > options(progressify.debug = TRUE) > y <- progressify(lapply(X = 1:3, FUN = function(x) { + print(x) + })) [10:25:48.815] progressify() ... [10:25:48.816] | transpile() ... [10:25:48.817] | : get_transpiler() ... [10:25:48.818] | : . Finding call to be transpiled ... [10:25:48.818] | : . | descend_wrappers() ... [10:25:48.819] | : . | : Call: [10:25:48.819] | : . | : lapply [10:25:48.820] | : . | : parse_call() ... [10:25:48.821] | : . | : . Function: lapply(...) [10:25:48.821] | : . | : . Locate function ... [10:25:48.822] | : . | : . | Function located in: 'base' [10:25:48.822] | : . | : . Locate function ... done [10:25:48.823] | : . | : parse_call() ... done [10:25:48.823] | : . | descend_wrappers() ... done [10:25:48.824] | : . | parse_call() ... [10:25:48.824] | : . | : Function: lapply(...) [10:25:48.825] | : . | : Locate function ... [10:25:48.825] | : . | : . Function located in: 'base' [10:25:48.826] | : . | : Locate function ... done [10:25:48.826] | : . | parse_call() ... done [10:25:48.827] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.827] | : . | lapply [10:25:48.828] | : . Finding call to be transpiled ... done [10:25:48.828] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.829] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.829] | : . | Transpiler description: base::lapply() transpiler [10:25:48.830] | : . | Transpiler function: [10:25:48.830] | : . | function (expr, options) [10:25:48.830] | : . | { [10:25:48.830] | : . | ns <- baseenv() [10:25:48.830] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.830] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.830] | : . | } [10:25:48.830] | : . | [10:25:48.831] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.831] | : get_transpiler() ... done [10:25:48.832] | : Transpile call expression ... [10:25:48.833] | : . local(lapply(X = { [10:25:48.833] | : . .progressr_progressor <- progressr::progressor(along = 1:3) [10:25:48.833] | : . 1:3 [10:25:48.833] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.833] | : . on.exit(.progressr_progressor()) [10:25:48.833] | : . ...FUN(...) [10:25:48.833] | : . }, ...FUN = function(x) { [10:25:48.833] | : . print(x) [10:25:48.833] | : . }, .progressr_progressor = .progressr_progressor)) [10:25:48.834] | : Transpile call expression ... done [10:25:48.834] | : Evaluate transpiled call expression [1] 1 [1] 2 [1] 3 [10:25:48.835] | transpile() ... done [10:25:48.836] progressify() ... done > print(y) [[1]] [1] 1 [[2]] [1] 2 [[3]] [1] 3 > xs <- list(aa = 1, bb = 1:2, cc = 1:10, dd = 1:5, + .ee = -6:6) > FUN <- function(x, na.rm = TRUE) { + a <- 1:5 + add <- NULL + if (length(x) == 2) { + add <- list(C = 42) + } + median(c .... [TRUNCATED] > es <- as.environment(xs) > exprs <- list(lapply = quote(lapply(X = xs, FUN = FUN)), + lapply = quote(base::lapply(X = xs, FUN = FUN)), sapply = quote(sapply(X = xs, + .... [TRUNCATED] > for (kk in seq_along(exprs)) { + name <- names(exprs)[kk] + expr <- exprs[[kk]] + message() + message(sprintf("=== %s ============== ..." ... [TRUNCATED] === lapply ========================== lapply(X = xs, FUN = FUN) --------------------------------- progressify(lapply(X = xs, FUN = FUN)) [10:25:48.860] progressify() ... [10:25:48.860] | transpile() ... [10:25:48.861] | : get_transpiler() ... [10:25:48.862] | : . Finding call to be transpiled ... [10:25:48.862] | : . | descend_wrappers() ... [10:25:48.863] | : . | : Call: [10:25:48.863] | : . | : lapply [10:25:48.864] | : . | : parse_call() ... [10:25:48.865] | : . | : . Function: lapply(...) [10:25:48.865] | : . | : . Locate function ... [10:25:48.866] | : . | : . | Function located in: 'base' [10:25:48.866] | : . | : . Locate function ... done [10:25:48.867] | : . | : parse_call() ... done [10:25:48.867] | : . | descend_wrappers() ... done [10:25:48.868] | : . | parse_call() ... [10:25:48.868] | : . | : Function: lapply(...) [10:25:48.869] | : . | : Locate function ... [10:25:48.870] | : . | : . Function located in: 'base' [10:25:48.870] | : . | : Locate function ... done [10:25:48.871] | : . | parse_call() ... done [10:25:48.871] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.872] | : . | lapply [10:25:48.872] | : . Finding call to be transpiled ... done [10:25:48.873] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.874] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.874] | : . | Transpiler description: base::lapply() transpiler [10:25:48.875] | : . | Transpiler function: [10:25:48.875] | : . | function (expr, options) [10:25:48.875] | : . | { [10:25:48.875] | : . | ns <- baseenv() [10:25:48.875] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.875] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.875] | : . | } [10:25:48.875] | : . | [10:25:48.876] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.877] | : get_transpiler() ... done [10:25:48.877] | : Transpile call expression ... [10:25:48.878] | : . local(lapply(X = { [10:25:48.878] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.878] | : . xs [10:25:48.878] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.878] | : . on.exit(.progressr_progressor()) [10:25:48.878] | : . ...FUN(...) [10:25:48.878] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.879] | : Transpile call expression ... done [10:25:48.879] | : Evaluate transpiled call expression [10:25:48.880] | transpile() ... done [10:25:48.881] progressify() ... done List of 5 $ aa : num 2.5 $ bb : int 2 $ cc : int 4 $ dd : num 3 $ .ee: num 1.5 [10:25:48.885] progressify() ... [10:25:48.886] | transpile() ... [10:25:48.886] | : get_transpiler() ... [10:25:48.887] | : . Finding call to be transpiled ... [10:25:48.887] | : . | descend_wrappers() ... [10:25:48.888] | : . | : Call: [10:25:48.888] | : . | : lapply [10:25:48.889] | : . | : parse_call() ... [10:25:48.890] | : . | : . Function: lapply(...) [10:25:48.890] | : . | : . Locate function ... [10:25:48.891] | : . | : . | Function located in: 'base' [10:25:48.891] | : . | : . Locate function ... done [10:25:48.892] | : . | : parse_call() ... done [10:25:48.892] | : . | descend_wrappers() ... done [10:25:48.893] | : . | parse_call() ... [10:25:48.893] | : . | : Function: lapply(...) [10:25:48.894] | : . | : Locate function ... [10:25:48.894] | : . | : . Function located in: 'base' [10:25:48.895] | : . | : Locate function ... done [10:25:48.896] | : . | parse_call() ... done [10:25:48.896] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.897] | : . | lapply [10:25:48.897] | : . Finding call to be transpiled ... done [10:25:48.898] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.898] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.899] | : . | Transpiler description: base::lapply() transpiler [10:25:48.899] | : . | Transpiler function: [10:25:48.900] | : . | function (expr, options) [10:25:48.900] | : . | { [10:25:48.900] | : . | ns <- baseenv() [10:25:48.900] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.900] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.900] | : . | } [10:25:48.900] | : . | [10:25:48.901] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.901] | : get_transpiler() ... done [10:25:48.902] | : Transpile call expression ... [10:25:48.902] | : . local(lapply(X = { [10:25:48.902] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.902] | : . xs [10:25:48.902] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.902] | : . on.exit(.progressr_progressor()) [10:25:48.902] | : . ...FUN(...) [10:25:48.902] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.903] | : Transpile call expression ... done [10:25:48.904] | : Evaluate transpiled call expression [10:25:48.905] | transpile() ... done [10:25:48.905] progressify() ... done character(0) [10:25:48.906] progressify() ... [10:25:48.907] | transpile() ... [10:25:48.907] | : get_transpiler() ... [10:25:48.908] | : . Finding call to be transpiled ... [10:25:48.908] | : . | descend_wrappers() ... [10:25:48.909] | : . | : Call: [10:25:48.909] | : . | : lapply [10:25:48.910] | : . | : parse_call() ... [10:25:48.910] | : . | : . Function: lapply(...) [10:25:48.911] | : . | : . Locate function ... [10:25:48.912] | : . | : . | Function located in: 'base' [10:25:48.912] | : . | : . Locate function ... done [10:25:48.913] | : . | : parse_call() ... done [10:25:48.913] | : . | descend_wrappers() ... done [10:25:48.914] | : . | parse_call() ... [10:25:48.914] | : . | : Function: lapply(...) [10:25:48.915] | : . | : Locate function ... [10:25:48.915] | : . | : . Function located in: 'base' [10:25:48.916] | : . | : Locate function ... done [10:25:48.916] | : . | parse_call() ... done [10:25:48.917] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.917] | : . | lapply [10:25:48.918] | : . Finding call to be transpiled ... done [10:25:48.919] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.919] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.920] | : . | Transpiler description: base::lapply() transpiler [10:25:48.920] | : . | Transpiler function: [10:25:48.921] | : . | function (expr, options) [10:25:48.921] | : . | { [10:25:48.921] | : . | ns <- baseenv() [10:25:48.921] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.921] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.921] | : . | } [10:25:48.921] | : . | [10:25:48.921] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.922] | : get_transpiler() ... done [10:25:48.923] | : Transpile call expression ... [10:25:48.923] | : . local(lapply(X = { [10:25:48.923] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.923] | : . xs [10:25:48.923] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.923] | : . on.exit(.progressr_progressor()) [10:25:48.923] | : . ...FUN(...) [10:25:48.923] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.925] | : Transpile call expression ... done [10:25:48.926] | : Evaluate transpiled call expression [10:25:48.927] | transpile() ... done [10:25:48.927] progressify() ... done === lapply ========================== base::lapply(X = xs, FUN = FUN) --------------------------------- progressify(base::lapply(X = xs, FUN = FUN)) [10:25:48.928] progressify() ... [10:25:48.929] | transpile() ... [10:25:48.929] | : get_transpiler() ... [10:25:48.930] | : . Finding call to be transpiled ... [10:25:48.930] | : . | descend_wrappers() ... [10:25:48.931] | : . | : Call: [10:25:48.932] | : . | : base::lapply [10:25:48.933] | : . | : parse_call() ... [10:25:48.934] | : . | : . Function: base::lapply(...) [10:25:48.934] | : . | : parse_call() ... done [10:25:48.935] | : . | descend_wrappers() ... done [10:25:48.935] | : . | parse_call() ... [10:25:48.936] | : . | : Function: base::lapply(...) [10:25:48.937] | : . | parse_call() ... done [10:25:48.937] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.938] | : . | base::lapply [10:25:48.939] | : . Finding call to be transpiled ... done [10:25:48.939] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.940] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.940] | : . | Transpiler description: base::lapply() transpiler [10:25:48.941] | : . | Transpiler function: [10:25:48.942] | : . | function (expr, options) [10:25:48.942] | : . | { [10:25:48.942] | : . | ns <- baseenv() [10:25:48.942] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.942] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.942] | : . | } [10:25:48.942] | : . | [10:25:48.942] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.943] | : get_transpiler() ... done [10:25:48.944] | : Transpile call expression ... [10:25:48.944] | : . local(base::lapply(X = { [10:25:48.944] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.944] | : . xs [10:25:48.944] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.944] | : . on.exit(.progressr_progressor()) [10:25:48.944] | : . ...FUN(...) [10:25:48.944] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.946] | : Transpile call expression ... done [10:25:48.946] | : Evaluate transpiled call expression [10:25:48.947] | transpile() ... done [10:25:48.948] progressify() ... done List of 5 $ aa : num 2.5 $ bb : int 2 $ cc : int 4 $ dd : num 3 $ .ee: num 1.5 [10:25:48.951] progressify() ... [10:25:48.951] | transpile() ... [10:25:48.952] | : get_transpiler() ... [10:25:48.952] | : . Finding call to be transpiled ... [10:25:48.953] | : . | descend_wrappers() ... [10:25:48.953] | : . | : Call: [10:25:48.954] | : . | : base::lapply [10:25:48.955] | : . | : parse_call() ... [10:25:48.955] | : . | : . Function: base::lapply(...) [10:25:48.956] | : . | : parse_call() ... done [10:25:48.956] | : . | descend_wrappers() ... done [10:25:48.957] | : . | parse_call() ... [10:25:48.957] | : . | : Function: base::lapply(...) [10:25:48.958] | : . | parse_call() ... done [10:25:48.958] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.959] | : . | base::lapply [10:25:48.959] | : . Finding call to be transpiled ... done [10:25:48.960] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.960] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.961] | : . | Transpiler description: base::lapply() transpiler [10:25:48.961] | : . | Transpiler function: [10:25:48.962] | : . | function (expr, options) [10:25:48.962] | : . | { [10:25:48.962] | : . | ns <- baseenv() [10:25:48.962] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.962] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.962] | : . | } [10:25:48.962] | : . | [10:25:48.963] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.963] | : get_transpiler() ... done [10:25:48.964] | : Transpile call expression ... [10:25:48.964] | : . local(base::lapply(X = { [10:25:48.964] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.964] | : . xs [10:25:48.964] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.964] | : . on.exit(.progressr_progressor()) [10:25:48.964] | : . ...FUN(...) [10:25:48.964] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.965] | : Transpile call expression ... done [10:25:48.966] | : Evaluate transpiled call expression [10:25:48.966] | transpile() ... done [10:25:48.967] progressify() ... done character(0) [10:25:48.967] progressify() ... [10:25:48.968] | transpile() ... [10:25:48.968] | : get_transpiler() ... [10:25:48.969] | : . Finding call to be transpiled ... [10:25:48.969] | : . | descend_wrappers() ... [10:25:48.970] | : . | : Call: [10:25:48.970] | : . | : base::lapply [10:25:48.971] | : . | : parse_call() ... [10:25:48.971] | : . | : . Function: base::lapply(...) [10:25:48.972] | : . | : parse_call() ... done [10:25:48.972] | : . | descend_wrappers() ... done [10:25:48.973] | : . | parse_call() ... [10:25:48.973] | : . | : Function: base::lapply(...) [10:25:48.974] | : . | parse_call() ... done [10:25:48.974] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.975] | : . | base::lapply [10:25:48.975] | : . Finding call to be transpiled ... done [10:25:48.976] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... [10:25:48.976] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.977] | : . | Transpiler description: base::lapply() transpiler [10:25:48.977] | : . | Transpiler function: [10:25:48.978] | : . | function (expr, options) [10:25:48.978] | : . | { [10:25:48.978] | : . | ns <- baseenv() [10:25:48.978] | : . | fcn <- get("lapply", mode = "function", envir = ns) [10:25:48.978] | : . | progressify_base(expr, fcn_name = "lapply", fcn = fcn, envir = parent.frame()) [10:25:48.978] | : . | } [10:25:48.978] | : . | [10:25:48.978] | : . Locating 'progressify::built-in' transpiler for base::lapply() of class 'function' ... done [10:25:48.979] | : get_transpiler() ... done [10:25:48.979] | : Transpile call expression ... [10:25:48.980] | : . local(base::lapply(X = { [10:25:48.980] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.980] | : . xs [10:25:48.980] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.980] | : . on.exit(.progressr_progressor()) [10:25:48.980] | : . ...FUN(...) [10:25:48.980] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:48.981] | : Transpile call expression ... done [10:25:48.981] | : Evaluate transpiled call expression [10:25:48.982] | transpile() ... done [10:25:48.982] progressify() ... done === sapply ========================== sapply(X = xs, FUN = FUN) --------------------------------- progressify(sapply(X = xs, FUN = FUN)) [10:25:48.984] progressify() ... [10:25:48.984] | transpile() ... [10:25:48.985] | : get_transpiler() ... [10:25:48.985] | : . Finding call to be transpiled ... [10:25:48.985] | : . | descend_wrappers() ... [10:25:48.986] | : . | : Call: [10:25:48.986] | : . | : sapply [10:25:48.987] | : . | : parse_call() ... [10:25:48.987] | : . | : . Function: sapply(...) [10:25:48.988] | : . | : . Locate function ... [10:25:48.988] | : . | : . | Function located in: 'base' [10:25:48.989] | : . | : . Locate function ... done [10:25:48.989] | : . | : parse_call() ... done [10:25:48.990] | : . | descend_wrappers() ... done [10:25:48.990] | : . | parse_call() ... [10:25:48.991] | : . | : Function: sapply(...) [10:25:48.991] | : . | : Locate function ... [10:25:48.992] | : . | : . Function located in: 'base' [10:25:48.992] | : . | : Locate function ... done [10:25:48.993] | : . | parse_call() ... done [10:25:48.993] | : . | Position of call to be transpiled in expression: c(1) [10:25:48.994] | : . | sapply [10:25:48.994] | : . Finding call to be transpiled ... done [10:25:48.995] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:48.995] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:48.996] | : . | Transpiler description: base::sapply() transpiler [10:25:48.996] | : . | Transpiler function: [10:25:48.996] | : . | function (expr, options) [10:25:48.996] | : . | { [10:25:48.996] | : . | ns <- baseenv() [10:25:48.996] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:48.996] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:48.996] | : . | } [10:25:48.996] | : . | [10:25:48.997] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:48.998] | : get_transpiler() ... done [10:25:48.998] | : Transpile call expression ... [10:25:48.999] | : . local(sapply(X = { [10:25:48.999] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:48.999] | : . xs [10:25:48.999] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:48.999] | : . on.exit(.progressr_progressor()) [10:25:48.999] | : . ...FUN(...) [10:25:48.999] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.000] | : Transpile call expression ... done [10:25:49.000] | : Evaluate transpiled call expression [10:25:49.001] | transpile() ... done [10:25:49.001] progressify() ... done Named num [1:5] 2.5 2 4 3 1.5 - attr(*, "names")= chr [1:5] "aa" "bb" "cc" "dd" ... [10:25:49.003] progressify() ... [10:25:49.003] | transpile() ... [10:25:49.004] | : get_transpiler() ... [10:25:49.004] | : . Finding call to be transpiled ... [10:25:49.005] | : . | descend_wrappers() ... [10:25:49.005] | : . | : Call: [10:25:49.006] | : . | : sapply [10:25:49.006] | : . | : parse_call() ... [10:25:49.007] | : . | : . Function: sapply(...) [10:25:49.007] | : . | : . Locate function ... [10:25:49.008] | : . | : . | Function located in: 'base' [10:25:49.008] | : . | : . Locate function ... done [10:25:49.009] | : . | : parse_call() ... done [10:25:49.010] | : . | descend_wrappers() ... done [10:25:49.010] | : . | parse_call() ... [10:25:49.011] | : . | : Function: sapply(...) [10:25:49.011] | : . | : Locate function ... [10:25:49.012] | : . | : . Function located in: 'base' [10:25:49.012] | : . | : Locate function ... done [10:25:49.013] | : . | parse_call() ... done [10:25:49.013] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.014] | : . | sapply [10:25:49.014] | : . Finding call to be transpiled ... done [10:25:49.015] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.015] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.016] | : . | Transpiler description: base::sapply() transpiler [10:25:49.016] | : . | Transpiler function: [10:25:49.017] | : . | function (expr, options) [10:25:49.017] | : . | { [10:25:49.017] | : . | ns <- baseenv() [10:25:49.017] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.017] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.017] | : . | } [10:25:49.017] | : . | [10:25:49.017] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.018] | : get_transpiler() ... done [10:25:49.018] | : Transpile call expression ... [10:25:49.019] | : . local(sapply(X = { [10:25:49.019] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.019] | : . xs [10:25:49.019] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.019] | : . on.exit(.progressr_progressor()) [10:25:49.019] | : . ...FUN(...) [10:25:49.019] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.020] | : Transpile call expression ... done [10:25:49.020] | : Evaluate transpiled call expression [10:25:49.021] | transpile() ... done [10:25:49.021] progressify() ... done character(0) [10:25:49.022] progressify() ... [10:25:49.022] | transpile() ... [10:25:49.023] | : get_transpiler() ... [10:25:49.023] | : . Finding call to be transpiled ... [10:25:49.024] | : . | descend_wrappers() ... [10:25:49.024] | : . | : Call: [10:25:49.025] | : . | : sapply [10:25:49.025] | : . | : parse_call() ... [10:25:49.026] | : . | : . Function: sapply(...) [10:25:49.026] | : . | : . Locate function ... [10:25:49.027] | : . | : . | Function located in: 'base' [10:25:49.027] | : . | : . Locate function ... done [10:25:49.028] | : . | : parse_call() ... done [10:25:49.028] | : . | descend_wrappers() ... done [10:25:49.029] | : . | parse_call() ... [10:25:49.029] | : . | : Function: sapply(...) [10:25:49.030] | : . | : Locate function ... [10:25:49.030] | : . | : . Function located in: 'base' [10:25:49.031] | : . | : Locate function ... done [10:25:49.031] | : . | parse_call() ... done [10:25:49.032] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.032] | : . | sapply [10:25:49.033] | : . Finding call to be transpiled ... done [10:25:49.033] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.034] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.034] | : . | Transpiler description: base::sapply() transpiler [10:25:49.035] | : . | Transpiler function: [10:25:49.035] | : . | function (expr, options) [10:25:49.035] | : . | { [10:25:49.035] | : . | ns <- baseenv() [10:25:49.035] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.035] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.035] | : . | } [10:25:49.035] | : . | [10:25:49.036] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.036] | : get_transpiler() ... done [10:25:49.037] | : Transpile call expression ... [10:25:49.037] | : . local(sapply(X = { [10:25:49.037] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.037] | : . xs [10:25:49.037] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.037] | : . on.exit(.progressr_progressor()) [10:25:49.037] | : . ...FUN(...) [10:25:49.037] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.038] | : Transpile call expression ... done [10:25:49.039] | : Evaluate transpiled call expression [10:25:49.040] | transpile() ... done [10:25:49.040] progressify() ... done === sapply ========================== base::sapply(X = xs, FUN = FUN) --------------------------------- progressify(base::sapply(X = xs, FUN = FUN)) [10:25:49.041] progressify() ... [10:25:49.041] | transpile() ... [10:25:49.042] | : get_transpiler() ... [10:25:49.042] | : . Finding call to be transpiled ... [10:25:49.043] | : . | descend_wrappers() ... [10:25:49.043] | : . | : Call: [10:25:49.044] | : . | : base::sapply [10:25:49.044] | : . | : parse_call() ... [10:25:49.045] | : . | : . Function: base::sapply(...) [10:25:49.045] | : . | : parse_call() ... done [10:25:49.046] | : . | descend_wrappers() ... done [10:25:49.046] | : . | parse_call() ... [10:25:49.047] | : . | : Function: base::sapply(...) [10:25:49.047] | : . | parse_call() ... done [10:25:49.048] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.048] | : . | base::sapply [10:25:49.049] | : . Finding call to be transpiled ... done [10:25:49.049] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.050] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.050] | : . | Transpiler description: base::sapply() transpiler [10:25:49.051] | : . | Transpiler function: [10:25:49.051] | : . | function (expr, options) [10:25:49.051] | : . | { [10:25:49.051] | : . | ns <- baseenv() [10:25:49.051] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.051] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.051] | : . | } [10:25:49.051] | : . | [10:25:49.052] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.052] | : get_transpiler() ... done [10:25:49.053] | : Transpile call expression ... [10:25:49.053] | : . local(base::sapply(X = { [10:25:49.053] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.053] | : . xs [10:25:49.053] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.053] | : . on.exit(.progressr_progressor()) [10:25:49.053] | : . ...FUN(...) [10:25:49.053] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.054] | : Transpile call expression ... done [10:25:49.055] | : Evaluate transpiled call expression [10:25:49.056] | transpile() ... done [10:25:49.056] progressify() ... done Named num [1:5] 2.5 2 4 3 1.5 - attr(*, "names")= chr [1:5] "aa" "bb" "cc" "dd" ... [10:25:49.057] progressify() ... [10:25:49.058] | transpile() ... [10:25:49.058] | : get_transpiler() ... [10:25:49.059] | : . Finding call to be transpiled ... [10:25:49.059] | : . | descend_wrappers() ... [10:25:49.060] | : . | : Call: [10:25:49.060] | : . | : base::sapply [10:25:49.061] | : . | : parse_call() ... [10:25:49.061] | : . | : . Function: base::sapply(...) [10:25:49.062] | : . | : parse_call() ... done [10:25:49.062] | : . | descend_wrappers() ... done [10:25:49.063] | : . | parse_call() ... [10:25:49.063] | : . | : Function: base::sapply(...) [10:25:49.064] | : . | parse_call() ... done [10:25:49.064] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.065] | : . | base::sapply [10:25:49.065] | : . Finding call to be transpiled ... done [10:25:49.066] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.066] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.067] | : . | Transpiler description: base::sapply() transpiler [10:25:49.067] | : . | Transpiler function: [10:25:49.068] | : . | function (expr, options) [10:25:49.068] | : . | { [10:25:49.068] | : . | ns <- baseenv() [10:25:49.068] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.068] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.068] | : . | } [10:25:49.068] | : . | [10:25:49.068] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.069] | : get_transpiler() ... done [10:25:49.069] | : Transpile call expression ... [10:25:49.070] | : . local(base::sapply(X = { [10:25:49.070] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.070] | : . xs [10:25:49.070] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.070] | : . on.exit(.progressr_progressor()) [10:25:49.070] | : . ...FUN(...) [10:25:49.070] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.071] | : Transpile call expression ... done [10:25:49.071] | : Evaluate transpiled call expression [10:25:49.072] | transpile() ... done [10:25:49.072] progressify() ... done character(0) [10:25:49.073] progressify() ... [10:25:49.073] | transpile() ... [10:25:49.074] | : get_transpiler() ... [10:25:49.074] | : . Finding call to be transpiled ... [10:25:49.075] | : . | descend_wrappers() ... [10:25:49.075] | : . | : Call: [10:25:49.076] | : . | : base::sapply [10:25:49.076] | : . | : parse_call() ... [10:25:49.077] | : . | : . Function: base::sapply(...) [10:25:49.077] | : . | : parse_call() ... done [10:25:49.078] | : . | descend_wrappers() ... done [10:25:49.078] | : . | parse_call() ... [10:25:49.079] | : . | : Function: base::sapply(...) [10:25:49.079] | : . | parse_call() ... done [10:25:49.080] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.080] | : . | base::sapply [10:25:49.081] | : . Finding call to be transpiled ... done [10:25:49.081] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.082] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.082] | : . | Transpiler description: base::sapply() transpiler [10:25:49.083] | : . | Transpiler function: [10:25:49.083] | : . | function (expr, options) [10:25:49.083] | : . | { [10:25:49.083] | : . | ns <- baseenv() [10:25:49.083] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.083] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.083] | : . | } [10:25:49.083] | : . | [10:25:49.084] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.084] | : get_transpiler() ... done [10:25:49.085] | : Transpile call expression ... [10:25:49.085] | : . local(base::sapply(X = { [10:25:49.085] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.085] | : . xs [10:25:49.085] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.085] | : . on.exit(.progressr_progressor()) [10:25:49.085] | : . ...FUN(...) [10:25:49.085] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.086] | : Transpile call expression ... done [10:25:49.087] | : Evaluate transpiled call expression [10:25:49.087] | transpile() ... done [10:25:49.088] progressify() ... done === sapply ========================== base::sapply(X = xs, FUN = FUN, simplify = FALSE) --------------------------------- progressify(base::sapply(X = xs, FUN = FUN, simplify = FALSE)) [10:25:49.089] progressify() ... [10:25:49.089] | transpile() ... [10:25:49.090] | : get_transpiler() ... [10:25:49.090] | : . Finding call to be transpiled ... [10:25:49.091] | : . | descend_wrappers() ... [10:25:49.091] | : . | : Call: [10:25:49.092] | : . | : base::sapply [10:25:49.092] | : . | : parse_call() ... [10:25:49.094] | : . | : . Function: base::sapply(...) [10:25:49.094] | : . | : parse_call() ... done [10:25:49.095] | : . | descend_wrappers() ... done [10:25:49.095] | : . | parse_call() ... [10:25:49.096] | : . | : Function: base::sapply(...) [10:25:49.096] | : . | parse_call() ... done [10:25:49.097] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.097] | : . | base::sapply [10:25:49.098] | : . Finding call to be transpiled ... done [10:25:49.098] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.099] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.099] | : . | Transpiler description: base::sapply() transpiler [10:25:49.100] | : . | Transpiler function: [10:25:49.100] | : . | function (expr, options) [10:25:49.100] | : . | { [10:25:49.100] | : . | ns <- baseenv() [10:25:49.100] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.100] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.100] | : . | } [10:25:49.100] | : . | [10:25:49.101] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.101] | : get_transpiler() ... done [10:25:49.102] | : Transpile call expression ... [10:25:49.102] | : . local(base::sapply(X = { [10:25:49.102] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.102] | : . xs [10:25:49.102] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.102] | : . on.exit(.progressr_progressor()) [10:25:49.102] | : . ...FUN(...) [10:25:49.102] | : . }, simplify = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.103] | : Transpile call expression ... done [10:25:49.104] | : Evaluate transpiled call expression [10:25:49.104] | transpile() ... done [10:25:49.105] progressify() ... done List of 5 $ aa : num 2.5 $ bb : int 2 $ cc : int 4 $ dd : num 3 $ .ee: num 1.5 [10:25:49.108] progressify() ... [10:25:49.108] | transpile() ... [10:25:49.109] | : get_transpiler() ... [10:25:49.109] | : . Finding call to be transpiled ... [10:25:49.110] | : . | descend_wrappers() ... [10:25:49.110] | : . | : Call: [10:25:49.111] | : . | : base::sapply [10:25:49.111] | : . | : parse_call() ... [10:25:49.112] | : . | : . Function: base::sapply(...) [10:25:49.112] | : . | : parse_call() ... done [10:25:49.113] | : . | descend_wrappers() ... done [10:25:49.113] | : . | parse_call() ... [10:25:49.114] | : . | : Function: base::sapply(...) [10:25:49.114] | : . | parse_call() ... done [10:25:49.115] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.115] | : . | base::sapply [10:25:49.116] | : . Finding call to be transpiled ... done [10:25:49.116] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.117] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.117] | : . | Transpiler description: base::sapply() transpiler [10:25:49.118] | : . | Transpiler function: [10:25:49.118] | : . | function (expr, options) [10:25:49.118] | : . | { [10:25:49.118] | : . | ns <- baseenv() [10:25:49.118] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.118] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.118] | : . | } [10:25:49.118] | : . | [10:25:49.119] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.119] | : get_transpiler() ... done [10:25:49.120] | : Transpile call expression ... [10:25:49.120] | : . local(base::sapply(X = { [10:25:49.120] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.120] | : . xs [10:25:49.120] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.120] | : . on.exit(.progressr_progressor()) [10:25:49.120] | : . ...FUN(...) [10:25:49.120] | : . }, simplify = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.121] | : Transpile call expression ... done [10:25:49.122] | : Evaluate transpiled call expression [10:25:49.122] | transpile() ... done [10:25:49.123] progressify() ... done character(0) [10:25:49.123] progressify() ... [10:25:49.124] | transpile() ... [10:25:49.124] | : get_transpiler() ... [10:25:49.125] | : . Finding call to be transpiled ... [10:25:49.125] | : . | descend_wrappers() ... [10:25:49.126] | : . | : Call: [10:25:49.126] | : . | : base::sapply [10:25:49.127] | : . | : parse_call() ... [10:25:49.127] | : . | : . Function: base::sapply(...) [10:25:49.128] | : . | : parse_call() ... done [10:25:49.128] | : . | descend_wrappers() ... done [10:25:49.129] | : . | parse_call() ... [10:25:49.129] | : . | : Function: base::sapply(...) [10:25:49.130] | : . | parse_call() ... done [10:25:49.130] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.131] | : . | base::sapply [10:25:49.131] | : . Finding call to be transpiled ... done [10:25:49.132] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.132] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.133] | : . | Transpiler description: base::sapply() transpiler [10:25:49.133] | : . | Transpiler function: [10:25:49.134] | : . | function (expr, options) [10:25:49.134] | : . | { [10:25:49.134] | : . | ns <- baseenv() [10:25:49.134] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.134] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.134] | : . | } [10:25:49.134] | : . | [10:25:49.134] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.135] | : get_transpiler() ... done [10:25:49.135] | : Transpile call expression ... [10:25:49.136] | : . local(base::sapply(X = { [10:25:49.136] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.136] | : . xs [10:25:49.136] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.136] | : . on.exit(.progressr_progressor()) [10:25:49.136] | : . ...FUN(...) [10:25:49.136] | : . }, simplify = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.137] | : Transpile call expression ... done [10:25:49.137] | : Evaluate transpiled call expression [10:25:49.138] | transpile() ... done [10:25:49.138] progressify() ... done === sapply ========================== base::sapply(X = xs, FUN = FUN, USE.NAMES = FALSE) --------------------------------- progressify(base::sapply(X = xs, FUN = FUN, USE.NAMES = FALSE)) [10:25:49.139] progressify() ... [10:25:49.140] | transpile() ... [10:25:49.140] | : get_transpiler() ... [10:25:49.141] | : . Finding call to be transpiled ... [10:25:49.141] | : . | descend_wrappers() ... [10:25:49.142] | : . | : Call: [10:25:49.142] | : . | : base::sapply [10:25:49.143] | : . | : parse_call() ... [10:25:49.143] | : . | : . Function: base::sapply(...) [10:25:49.144] | : . | : parse_call() ... done [10:25:49.144] | : . | descend_wrappers() ... done [10:25:49.145] | : . | parse_call() ... [10:25:49.145] | : . | : Function: base::sapply(...) [10:25:49.146] | : . | parse_call() ... done [10:25:49.146] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.147] | : . | base::sapply [10:25:49.147] | : . Finding call to be transpiled ... done [10:25:49.148] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.148] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.149] | : . | Transpiler description: base::sapply() transpiler [10:25:49.149] | : . | Transpiler function: [10:25:49.150] | : . | function (expr, options) [10:25:49.150] | : . | { [10:25:49.150] | : . | ns <- baseenv() [10:25:49.150] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.150] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.150] | : . | } [10:25:49.150] | : . | [10:25:49.150] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.151] | : get_transpiler() ... done [10:25:49.151] | : Transpile call expression ... [10:25:49.152] | : . local(base::sapply(X = { [10:25:49.152] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.152] | : . xs [10:25:49.152] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.152] | : . on.exit(.progressr_progressor()) [10:25:49.152] | : . ...FUN(...) [10:25:49.152] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.153] | : Transpile call expression ... done [10:25:49.153] | : Evaluate transpiled call expression [10:25:49.154] | transpile() ... done [10:25:49.154] progressify() ... done Named num [1:5] 2.5 2 4 3 1.5 - attr(*, "names")= chr [1:5] "aa" "bb" "cc" "dd" ... [10:25:49.156] progressify() ... [10:25:49.156] | transpile() ... [10:25:49.157] | : get_transpiler() ... [10:25:49.157] | : . Finding call to be transpiled ... [10:25:49.158] | : . | descend_wrappers() ... [10:25:49.158] | : . | : Call: [10:25:49.159] | : . | : base::sapply [10:25:49.159] | : . | : parse_call() ... [10:25:49.160] | : . | : . Function: base::sapply(...) [10:25:49.160] | : . | : parse_call() ... done [10:25:49.161] | : . | descend_wrappers() ... done [10:25:49.161] | : . | parse_call() ... [10:25:49.162] | : . | : Function: base::sapply(...) [10:25:49.162] | : . | parse_call() ... done [10:25:49.162] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.163] | : . | base::sapply [10:25:49.164] | : . Finding call to be transpiled ... done [10:25:49.164] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.164] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.165] | : . | Transpiler description: base::sapply() transpiler [10:25:49.165] | : . | Transpiler function: [10:25:49.166] | : . | function (expr, options) [10:25:49.166] | : . | { [10:25:49.166] | : . | ns <- baseenv() [10:25:49.166] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.166] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.166] | : . | } [10:25:49.166] | : . | [10:25:49.167] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.167] | : get_transpiler() ... done [10:25:49.168] | : Transpile call expression ... [10:25:49.168] | : . local(base::sapply(X = { [10:25:49.168] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.168] | : . xs [10:25:49.168] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.168] | : . on.exit(.progressr_progressor()) [10:25:49.168] | : . ...FUN(...) [10:25:49.168] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.169] | : Transpile call expression ... done [10:25:49.170] | : Evaluate transpiled call expression [10:25:49.170] | transpile() ... done [10:25:49.172] progressify() ... done character(0) [10:25:49.172] progressify() ... [10:25:49.173] | transpile() ... [10:25:49.173] | : get_transpiler() ... [10:25:49.174] | : . Finding call to be transpiled ... [10:25:49.174] | : . | descend_wrappers() ... [10:25:49.175] | : . | : Call: [10:25:49.175] | : . | : base::sapply [10:25:49.176] | : . | : parse_call() ... [10:25:49.176] | : . | : . Function: base::sapply(...) [10:25:49.177] | : . | : parse_call() ... done [10:25:49.177] | : . | descend_wrappers() ... done [10:25:49.177] | : . | parse_call() ... [10:25:49.178] | : . | : Function: base::sapply(...) [10:25:49.178] | : . | parse_call() ... done [10:25:49.179] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.179] | : . | base::sapply [10:25:49.180] | : . Finding call to be transpiled ... done [10:25:49.180] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... [10:25:49.181] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.181] | : . | Transpiler description: base::sapply() transpiler [10:25:49.182] | : . | Transpiler function: [10:25:49.182] | : . | function (expr, options) [10:25:49.182] | : . | { [10:25:49.182] | : . | ns <- baseenv() [10:25:49.182] | : . | fcn <- get("sapply", mode = "function", envir = ns) [10:25:49.182] | : . | progressify_base(expr, fcn_name = "sapply", fcn = fcn, envir = parent.frame()) [10:25:49.182] | : . | } [10:25:49.182] | : . | [10:25:49.183] | : . Locating 'progressify::built-in' transpiler for base::sapply() of class 'function' ... done [10:25:49.183] | : get_transpiler() ... done [10:25:49.184] | : Transpile call expression ... [10:25:49.185] | : . local(base::sapply(X = { [10:25:49.185] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.185] | : . xs [10:25:49.185] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.185] | : . on.exit(.progressr_progressor()) [10:25:49.185] | : . ...FUN(...) [10:25:49.185] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.185] | : Transpile call expression ... done [10:25:49.186] | : Evaluate transpiled call expression [10:25:49.187] | transpile() ... done [10:25:49.187] progressify() ... done === vapply ========================== base::vapply(X = xs, FUN.VALUE = NA_real_, FUN = FUN) --------------------------------- progressify(base::vapply(X = xs, FUN.VALUE = NA_real_, FUN = FUN)) [10:25:49.188] progressify() ... [10:25:49.189] | transpile() ... [10:25:49.189] | : get_transpiler() ... [10:25:49.190] | : . Finding call to be transpiled ... [10:25:49.190] | : . | descend_wrappers() ... [10:25:49.191] | : . | : Call: [10:25:49.191] | : . | : base::vapply [10:25:49.192] | : . | : parse_call() ... [10:25:49.192] | : . | : . Function: base::vapply(...) [10:25:49.193] | : . | : parse_call() ... done [10:25:49.193] | : . | descend_wrappers() ... done [10:25:49.194] | : . | parse_call() ... [10:25:49.194] | : . | : Function: base::vapply(...) [10:25:49.194] | : . | parse_call() ... done [10:25:49.195] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.195] | : . | base::vapply [10:25:49.196] | : . Finding call to be transpiled ... done [10:25:49.196] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.197] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.197] | : . | Transpiler description: base::vapply() transpiler [10:25:49.198] | : . | Transpiler function: [10:25:49.198] | : . | function (expr, options) [10:25:49.198] | : . | { [10:25:49.198] | : . | ns <- baseenv() [10:25:49.198] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.198] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.198] | : . | } [10:25:49.198] | : . | [10:25:49.199] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.199] | : get_transpiler() ... done [10:25:49.200] | : Transpile call expression ... [10:25:49.201] | : . local(base::vapply(X = { [10:25:49.201] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.201] | : . xs [10:25:49.201] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.201] | : . on.exit(.progressr_progressor()) [10:25:49.201] | : . ...FUN(...) [10:25:49.201] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.202] | : Transpile call expression ... done [10:25:49.202] | : Evaluate transpiled call expression [10:25:49.203] | transpile() ... done [10:25:49.203] progressify() ... done Named num [1:5] 2.5 2 4 3 1.5 - attr(*, "names")= chr [1:5] "aa" "bb" "cc" "dd" ... [10:25:49.204] progressify() ... [10:25:49.205] | transpile() ... [10:25:49.205] | : get_transpiler() ... [10:25:49.206] | : . Finding call to be transpiled ... [10:25:49.206] | : . | descend_wrappers() ... [10:25:49.207] | : . | : Call: [10:25:49.207] | : . | : base::vapply [10:25:49.208] | : . | : parse_call() ... [10:25:49.208] | : . | : . Function: base::vapply(...) [10:25:49.209] | : . | : parse_call() ... done [10:25:49.209] | : . | descend_wrappers() ... done [10:25:49.210] | : . | parse_call() ... [10:25:49.210] | : . | : Function: base::vapply(...) [10:25:49.211] | : . | parse_call() ... done [10:25:49.211] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.212] | : . | base::vapply [10:25:49.212] | : . Finding call to be transpiled ... done [10:25:49.213] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.213] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.214] | : . | Transpiler description: base::vapply() transpiler [10:25:49.214] | : . | Transpiler function: [10:25:49.215] | : . | function (expr, options) [10:25:49.215] | : . | { [10:25:49.215] | : . | ns <- baseenv() [10:25:49.215] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.215] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.215] | : . | } [10:25:49.215] | : . | [10:25:49.215] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.216] | : get_transpiler() ... done [10:25:49.216] | : Transpile call expression ... [10:25:49.217] | : . local(base::vapply(X = { [10:25:49.217] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.217] | : . xs [10:25:49.217] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.217] | : . on.exit(.progressr_progressor()) [10:25:49.217] | : . ...FUN(...) [10:25:49.217] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.218] | : Transpile call expression ... done [10:25:49.218] | : Evaluate transpiled call expression [10:25:49.219] | transpile() ... done [10:25:49.219] progressify() ... done character(0) [10:25:49.220] progressify() ... [10:25:49.221] | transpile() ... [10:25:49.221] | : get_transpiler() ... [10:25:49.221] | : . Finding call to be transpiled ... [10:25:49.222] | : . | descend_wrappers() ... [10:25:49.222] | : . | : Call: [10:25:49.223] | : . | : base::vapply [10:25:49.223] | : . | : parse_call() ... [10:25:49.224] | : . | : . Function: base::vapply(...) [10:25:49.224] | : . | : parse_call() ... done [10:25:49.225] | : . | descend_wrappers() ... done [10:25:49.225] | : . | parse_call() ... [10:25:49.226] | : . | : Function: base::vapply(...) [10:25:49.226] | : . | parse_call() ... done [10:25:49.227] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.227] | : . | base::vapply [10:25:49.228] | : . Finding call to be transpiled ... done [10:25:49.228] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.229] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.229] | : . | Transpiler description: base::vapply() transpiler [10:25:49.230] | : . | Transpiler function: [10:25:49.230] | : . | function (expr, options) [10:25:49.230] | : . | { [10:25:49.230] | : . | ns <- baseenv() [10:25:49.230] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.230] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.230] | : . | } [10:25:49.230] | : . | [10:25:49.231] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.231] | : get_transpiler() ... done [10:25:49.232] | : Transpile call expression ... [10:25:49.232] | : . local(base::vapply(X = { [10:25:49.232] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.232] | : . xs [10:25:49.232] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.232] | : . on.exit(.progressr_progressor()) [10:25:49.232] | : . ...FUN(...) [10:25:49.232] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.233] | : Transpile call expression ... done [10:25:49.234] | : Evaluate transpiled call expression [10:25:49.234] | transpile() ... done [10:25:49.235] progressify() ... done === vapply ========================== base::vapply(X = xs, FUN.VALUE = NA_real_, FUN = FUN, USE.NAMES = FALSE) --------------------------------- progressify(base::vapply(X = xs, FUN.VALUE = NA_real_, FUN = FUN, USE.NAMES = FALSE)) [10:25:49.236] progressify() ... [10:25:49.236] | transpile() ... [10:25:49.237] | : get_transpiler() ... [10:25:49.237] | : . Finding call to be transpiled ... [10:25:49.238] | : . | descend_wrappers() ... [10:25:49.238] | : . | : Call: [10:25:49.239] | : . | : base::vapply [10:25:49.239] | : . | : parse_call() ... [10:25:49.240] | : . | : . Function: base::vapply(...) [10:25:49.240] | : . | : parse_call() ... done [10:25:49.241] | : . | descend_wrappers() ... done [10:25:49.241] | : . | parse_call() ... [10:25:49.242] | : . | : Function: base::vapply(...) [10:25:49.242] | : . | parse_call() ... done [10:25:49.243] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.243] | : . | base::vapply [10:25:49.244] | : . Finding call to be transpiled ... done [10:25:49.244] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.245] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.245] | : . | Transpiler description: base::vapply() transpiler [10:25:49.246] | : . | Transpiler function: [10:25:49.246] | : . | function (expr, options) [10:25:49.246] | : . | { [10:25:49.246] | : . | ns <- baseenv() [10:25:49.246] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.246] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.246] | : . | } [10:25:49.246] | : . | [10:25:49.247] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.247] | : get_transpiler() ... done [10:25:49.248] | : Transpile call expression ... [10:25:49.248] | : . local(base::vapply(X = { [10:25:49.248] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.248] | : . xs [10:25:49.248] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.248] | : . on.exit(.progressr_progressor()) [10:25:49.248] | : . ...FUN(...) [10:25:49.248] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.249] | : Transpile call expression ... done [10:25:49.250] | : Evaluate transpiled call expression [10:25:49.251] | transpile() ... done [10:25:49.251] progressify() ... done num [1:5] 2.5 2 4 3 1.5 [10:25:49.252] progressify() ... [10:25:49.253] | transpile() ... [10:25:49.254] | : get_transpiler() ... [10:25:49.254] | : . Finding call to be transpiled ... [10:25:49.255] | : . | descend_wrappers() ... [10:25:49.255] | : . | : Call: [10:25:49.256] | : . | : base::vapply [10:25:49.256] | : . | : parse_call() ... [10:25:49.257] | : . | : . Function: base::vapply(...) [10:25:49.257] | : . | : parse_call() ... done [10:25:49.258] | : . | descend_wrappers() ... done [10:25:49.258] | : . | parse_call() ... [10:25:49.259] | : . | : Function: base::vapply(...) [10:25:49.259] | : . | parse_call() ... done [10:25:49.260] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.260] | : . | base::vapply [10:25:49.261] | : . Finding call to be transpiled ... done [10:25:49.261] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.262] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.262] | : . | Transpiler description: base::vapply() transpiler [10:25:49.263] | : . | Transpiler function: [10:25:49.263] | : . | function (expr, options) [10:25:49.263] | : . | { [10:25:49.263] | : . | ns <- baseenv() [10:25:49.263] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.263] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.263] | : . | } [10:25:49.263] | : . | [10:25:49.264] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.264] | : get_transpiler() ... done [10:25:49.265] | : Transpile call expression ... [10:25:49.265] | : . local(base::vapply(X = { [10:25:49.265] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.265] | : . xs [10:25:49.265] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.265] | : . on.exit(.progressr_progressor()) [10:25:49.265] | : . ...FUN(...) [10:25:49.265] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.266] | : Transpile call expression ... done [10:25:49.267] | : Evaluate transpiled call expression [10:25:49.267] | transpile() ... done [10:25:49.268] progressify() ... done character(0) [10:25:49.268] progressify() ... [10:25:49.269] | transpile() ... [10:25:49.269] | : get_transpiler() ... [10:25:49.270] | : . Finding call to be transpiled ... [10:25:49.270] | : . | descend_wrappers() ... [10:25:49.271] | : . | : Call: [10:25:49.271] | : . | : base::vapply [10:25:49.272] | : . | : parse_call() ... [10:25:49.272] | : . | : . Function: base::vapply(...) [10:25:49.273] | : . | : parse_call() ... done [10:25:49.273] | : . | descend_wrappers() ... done [10:25:49.274] | : . | parse_call() ... [10:25:49.274] | : . | : Function: base::vapply(...) [10:25:49.275] | : . | parse_call() ... done [10:25:49.275] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.276] | : . | base::vapply [10:25:49.276] | : . Finding call to be transpiled ... done [10:25:49.277] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... [10:25:49.277] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.278] | : . | Transpiler description: base::vapply() transpiler [10:25:49.278] | : . | Transpiler function: [10:25:49.279] | : . | function (expr, options) [10:25:49.279] | : . | { [10:25:49.279] | : . | ns <- baseenv() [10:25:49.279] | : . | fcn <- get("vapply", mode = "function", envir = ns) [10:25:49.279] | : . | progressify_base(expr, fcn_name = "vapply", fcn = fcn, envir = parent.frame()) [10:25:49.279] | : . | } [10:25:49.279] | : . | [10:25:49.279] | : . Locating 'progressify::built-in' transpiler for base::vapply() of class 'function' ... done [10:25:49.280] | : get_transpiler() ... done [10:25:49.280] | : Transpile call expression ... [10:25:49.281] | : . local(base::vapply(X = { [10:25:49.281] | : . .progressr_progressor <- progressr::progressor(along = xs) [10:25:49.281] | : . xs [10:25:49.281] | : . }, FUN.VALUE = NA_real_, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.281] | : . on.exit(.progressr_progressor()) [10:25:49.281] | : . ...FUN(...) [10:25:49.281] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.282] | : Transpile call expression ... done [10:25:49.282] | : Evaluate transpiled call expression [10:25:49.283] | transpile() ... done [10:25:49.283] progressify() ... done === eapply ========================== base::eapply(env = es, FUN = FUN) --------------------------------- progressify(base::eapply(env = es, FUN = FUN)) [10:25:49.284] progressify() ... [10:25:49.285] | transpile() ... [10:25:49.285] | : get_transpiler() ... [10:25:49.286] | : . Finding call to be transpiled ... [10:25:49.286] | : . | descend_wrappers() ... [10:25:49.287] | : . | : Call: [10:25:49.287] | : . | : base::eapply [10:25:49.288] | : . | : parse_call() ... [10:25:49.288] | : . | : . Function: base::eapply(...) [10:25:49.289] | : . | : parse_call() ... done [10:25:49.289] | : . | descend_wrappers() ... done [10:25:49.290] | : . | parse_call() ... [10:25:49.290] | : . | : Function: base::eapply(...) [10:25:49.291] | : . | parse_call() ... done [10:25:49.291] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.292] | : . | base::eapply [10:25:49.292] | : . Finding call to be transpiled ... done [10:25:49.293] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.293] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.294] | : . | Transpiler description: base::eapply() transpiler [10:25:49.294] | : . | Transpiler function: [10:25:49.295] | : . | function (expr, options) [10:25:49.295] | : . | { [10:25:49.295] | : . | ns <- baseenv() [10:25:49.295] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.295] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.295] | : . | } [10:25:49.295] | : . | [10:25:49.295] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.296] | : get_transpiler() ... done [10:25:49.296] | : Transpile call expression ... [10:25:49.297] | : . local(base::eapply(env = { [10:25:49.297] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.297] | : . es [10:25:49.297] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.297] | : . on.exit(.progressr_progressor()) [10:25:49.297] | : . ...FUN(...) [10:25:49.297] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.298] | : Transpile call expression ... done [10:25:49.298] | : Evaluate transpiled call expression [10:25:49.299] | transpile() ... done [10:25:49.300] progressify() ... done List of 4 $ dd: num 3 $ cc: int 4 $ bb: int 2 $ aa: num 2.5 [10:25:49.302] progressify() ... [10:25:49.302] | transpile() ... [10:25:49.303] | : get_transpiler() ... [10:25:49.303] | : . Finding call to be transpiled ... [10:25:49.304] | : . | descend_wrappers() ... [10:25:49.304] | : . | : Call: [10:25:49.305] | : . | : base::eapply [10:25:49.305] | : . | : parse_call() ... [10:25:49.306] | : . | : . Function: base::eapply(...) [10:25:49.306] | : . | : parse_call() ... done [10:25:49.307] | : . | descend_wrappers() ... done [10:25:49.307] | : . | parse_call() ... [10:25:49.308] | : . | : Function: base::eapply(...) [10:25:49.308] | : . | parse_call() ... done [10:25:49.309] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.309] | : . | base::eapply [10:25:49.310] | : . Finding call to be transpiled ... done [10:25:49.310] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.311] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.311] | : . | Transpiler description: base::eapply() transpiler [10:25:49.312] | : . | Transpiler function: [10:25:49.312] | : . | function (expr, options) [10:25:49.312] | : . | { [10:25:49.312] | : . | ns <- baseenv() [10:25:49.312] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.312] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.312] | : . | } [10:25:49.312] | : . | [10:25:49.313] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.313] | : get_transpiler() ... done [10:25:49.314] | : Transpile call expression ... [10:25:49.314] | : . local(base::eapply(env = { [10:25:49.314] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.314] | : . es [10:25:49.314] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.314] | : . on.exit(.progressr_progressor()) [10:25:49.314] | : . ...FUN(...) [10:25:49.314] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.315] | : Transpile call expression ... done [10:25:49.316] | : Evaluate transpiled call expression [10:25:49.316] | transpile() ... done [10:25:49.317] progressify() ... done character(0) [10:25:49.317] progressify() ... [10:25:49.318] | transpile() ... [10:25:49.319] | : get_transpiler() ... [10:25:49.319] | : . Finding call to be transpiled ... [10:25:49.320] | : . | descend_wrappers() ... [10:25:49.320] | : . | : Call: [10:25:49.321] | : . | : base::eapply [10:25:49.321] | : . | : parse_call() ... [10:25:49.322] | : . | : . Function: base::eapply(...) [10:25:49.322] | : . | : parse_call() ... done [10:25:49.323] | : . | descend_wrappers() ... done [10:25:49.323] | : . | parse_call() ... [10:25:49.324] | : . | : Function: base::eapply(...) [10:25:49.324] | : . | parse_call() ... done [10:25:49.325] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.325] | : . | base::eapply [10:25:49.326] | : . Finding call to be transpiled ... done [10:25:49.326] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.327] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.327] | : . | Transpiler description: base::eapply() transpiler [10:25:49.327] | : . | Transpiler function: [10:25:49.328] | : . | function (expr, options) [10:25:49.328] | : . | { [10:25:49.328] | : . | ns <- baseenv() [10:25:49.328] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.328] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.328] | : . | } [10:25:49.328] | : . | [10:25:49.329] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.329] | : get_transpiler() ... done [10:25:49.330] | : Transpile call expression ... [10:25:49.330] | : . local(base::eapply(env = { [10:25:49.330] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.330] | : . es [10:25:49.330] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.330] | : . on.exit(.progressr_progressor()) [10:25:49.330] | : . ...FUN(...) [10:25:49.330] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.331] | : Transpile call expression ... done [10:25:49.332] | : Evaluate transpiled call expression [10:25:49.332] | transpile() ... done [10:25:49.333] progressify() ... done === eapply ========================== base::eapply(env = es, FUN = FUN, all.names = TRUE) --------------------------------- progressify(base::eapply(env = es, FUN = FUN, all.names = TRUE)) [10:25:49.335] progressify() ... [10:25:49.335] | transpile() ... [10:25:49.336] | : get_transpiler() ... [10:25:49.336] | : . Finding call to be transpiled ... [10:25:49.337] | : . | descend_wrappers() ... [10:25:49.337] | : . | : Call: [10:25:49.338] | : . | : base::eapply [10:25:49.338] | : . | : parse_call() ... [10:25:49.339] | : . | : . Function: base::eapply(...) [10:25:49.339] | : . | : parse_call() ... done [10:25:49.340] | : . | descend_wrappers() ... done [10:25:49.340] | : . | parse_call() ... [10:25:49.340] | : . | : Function: base::eapply(...) [10:25:49.341] | : . | parse_call() ... done [10:25:49.341] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.342] | : . | base::eapply [10:25:49.342] | : . Finding call to be transpiled ... done [10:25:49.343] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.343] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.344] | : . | Transpiler description: base::eapply() transpiler [10:25:49.344] | : . | Transpiler function: [10:25:49.345] | : . | function (expr, options) [10:25:49.345] | : . | { [10:25:49.345] | : . | ns <- baseenv() [10:25:49.345] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.345] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.345] | : . | } [10:25:49.345] | : . | [10:25:49.345] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.346] | : get_transpiler() ... done [10:25:49.346] | : Transpile call expression ... [10:25:49.347] | : . local(base::eapply(env = { [10:25:49.347] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.347] | : . es [10:25:49.347] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.347] | : . on.exit(.progressr_progressor()) [10:25:49.347] | : . ...FUN(...) [10:25:49.347] | : . }, all.names = TRUE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.348] | : Transpile call expression ... done [10:25:49.348] | : Evaluate transpiled call expression [10:25:49.349] | transpile() ... done [10:25:49.350] progressify() ... done List of 5 $ .ee: num 1.5 $ dd : num 3 $ cc : int 4 $ bb : int 2 $ aa : num 2.5 [10:25:49.353] progressify() ... [10:25:49.353] | transpile() ... [10:25:49.354] | : get_transpiler() ... [10:25:49.354] | : . Finding call to be transpiled ... [10:25:49.355] | : . | descend_wrappers() ... [10:25:49.355] | : . | : Call: [10:25:49.355] | : . | : base::eapply [10:25:49.356] | : . | : parse_call() ... [10:25:49.357] | : . | : . Function: base::eapply(...) [10:25:49.357] | : . | : parse_call() ... done [10:25:49.358] | : . | descend_wrappers() ... done [10:25:49.358] | : . | parse_call() ... [10:25:49.358] | : . | : Function: base::eapply(...) [10:25:49.359] | : . | parse_call() ... done [10:25:49.359] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.360] | : . | base::eapply [10:25:49.360] | : . Finding call to be transpiled ... done [10:25:49.361] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.361] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.362] | : . | Transpiler description: base::eapply() transpiler [10:25:49.362] | : . | Transpiler function: [10:25:49.363] | : . | function (expr, options) [10:25:49.363] | : . | { [10:25:49.363] | : . | ns <- baseenv() [10:25:49.363] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.363] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.363] | : . | } [10:25:49.363] | : . | [10:25:49.363] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.364] | : get_transpiler() ... done [10:25:49.364] | : Transpile call expression ... [10:25:49.365] | : . local(base::eapply(env = { [10:25:49.365] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.365] | : . es [10:25:49.365] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.365] | : . on.exit(.progressr_progressor()) [10:25:49.365] | : . ...FUN(...) [10:25:49.365] | : . }, all.names = TRUE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.366] | : Transpile call expression ... done [10:25:49.366] | : Evaluate transpiled call expression [10:25:49.367] | transpile() ... done [10:25:49.368] progressify() ... done character(0) [10:25:49.368] progressify() ... [10:25:49.369] | transpile() ... [10:25:49.369] | : get_transpiler() ... [10:25:49.370] | : . Finding call to be transpiled ... [10:25:49.370] | : . | descend_wrappers() ... [10:25:49.371] | : . | : Call: [10:25:49.371] | : . | : base::eapply [10:25:49.372] | : . | : parse_call() ... [10:25:49.372] | : . | : . Function: base::eapply(...) [10:25:49.373] | : . | : parse_call() ... done [10:25:49.373] | : . | descend_wrappers() ... done [10:25:49.374] | : . | parse_call() ... [10:25:49.374] | : . | : Function: base::eapply(...) [10:25:49.374] | : . | parse_call() ... done [10:25:49.375] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.375] | : . | base::eapply [10:25:49.376] | : . Finding call to be transpiled ... done [10:25:49.376] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.377] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.377] | : . | Transpiler description: base::eapply() transpiler [10:25:49.378] | : . | Transpiler function: [10:25:49.378] | : . | function (expr, options) [10:25:49.378] | : . | { [10:25:49.378] | : . | ns <- baseenv() [10:25:49.378] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.378] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.378] | : . | } [10:25:49.378] | : . | [10:25:49.379] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.379] | : get_transpiler() ... done [10:25:49.380] | : Transpile call expression ... [10:25:49.381] | : . local(base::eapply(env = { [10:25:49.381] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.381] | : . es [10:25:49.381] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.381] | : . on.exit(.progressr_progressor()) [10:25:49.381] | : . ...FUN(...) [10:25:49.381] | : . }, all.names = TRUE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.381] | : Transpile call expression ... done [10:25:49.382] | : Evaluate transpiled call expression [10:25:49.383] | transpile() ... done [10:25:49.383] progressify() ... done === eapply ========================== base::eapply(env = es, FUN = FUN, USE.NAMES = FALSE) --------------------------------- progressify(base::eapply(env = es, FUN = FUN, USE.NAMES = FALSE)) [10:25:49.384] progressify() ... [10:25:49.385] | transpile() ... [10:25:49.385] | : get_transpiler() ... [10:25:49.386] | : . Finding call to be transpiled ... [10:25:49.386] | : . | descend_wrappers() ... [10:25:49.386] | : . | : Call: [10:25:49.387] | : . | : base::eapply [10:25:49.388] | : . | : parse_call() ... [10:25:49.388] | : . | : . Function: base::eapply(...) [10:25:49.388] | : . | : parse_call() ... done [10:25:49.389] | : . | descend_wrappers() ... done [10:25:49.389] | : . | parse_call() ... [10:25:49.390] | : . | : Function: base::eapply(...) [10:25:49.390] | : . | parse_call() ... done [10:25:49.391] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.391] | : . | base::eapply [10:25:49.392] | : . Finding call to be transpiled ... done [10:25:49.392] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.393] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.393] | : . | Transpiler description: base::eapply() transpiler [10:25:49.394] | : . | Transpiler function: [10:25:49.394] | : . | function (expr, options) [10:25:49.394] | : . | { [10:25:49.394] | : . | ns <- baseenv() [10:25:49.394] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.394] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.394] | : . | } [10:25:49.394] | : . | [10:25:49.395] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.395] | : get_transpiler() ... done [10:25:49.396] | : Transpile call expression ... [10:25:49.396] | : . local(base::eapply(env = { [10:25:49.396] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.396] | : . es [10:25:49.396] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.396] | : . on.exit(.progressr_progressor()) [10:25:49.396] | : . ...FUN(...) [10:25:49.396] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.397] | : Transpile call expression ... done [10:25:49.398] | : Evaluate transpiled call expression [10:25:49.399] | transpile() ... done [10:25:49.399] progressify() ... done List of 4 $ : num 3 $ : int 4 $ : int 2 $ : num 2.5 [10:25:49.401] progressify() ... [10:25:49.402] | transpile() ... [10:25:49.402] | : get_transpiler() ... [10:25:49.403] | : . Finding call to be transpiled ... [10:25:49.403] | : . | descend_wrappers() ... [10:25:49.404] | : . | : Call: [10:25:49.404] | : . | : base::eapply [10:25:49.405] | : . | : parse_call() ... [10:25:49.405] | : . | : . Function: base::eapply(...) [10:25:49.406] | : . | : parse_call() ... done [10:25:49.406] | : . | descend_wrappers() ... done [10:25:49.407] | : . | parse_call() ... [10:25:49.407] | : . | : Function: base::eapply(...) [10:25:49.409] | : . | parse_call() ... done [10:25:49.409] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.410] | : . | base::eapply [10:25:49.410] | : . Finding call to be transpiled ... done [10:25:49.411] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.411] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.412] | : . | Transpiler description: base::eapply() transpiler [10:25:49.412] | : . | Transpiler function: [10:25:49.412] | : . | function (expr, options) [10:25:49.412] | : . | { [10:25:49.412] | : . | ns <- baseenv() [10:25:49.412] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.412] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.412] | : . | } [10:25:49.412] | : . | [10:25:49.413] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.414] | : get_transpiler() ... done [10:25:49.414] | : Transpile call expression ... [10:25:49.415] | : . local(base::eapply(env = { [10:25:49.415] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.415] | : . es [10:25:49.415] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.415] | : . on.exit(.progressr_progressor()) [10:25:49.415] | : . ...FUN(...) [10:25:49.415] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.416] | : Transpile call expression ... done [10:25:49.416] | : Evaluate transpiled call expression [10:25:49.417] | transpile() ... done [10:25:49.417] progressify() ... done character(0) [10:25:49.418] progressify() ... [10:25:49.418] | transpile() ... [10:25:49.419] | : get_transpiler() ... [10:25:49.419] | : . Finding call to be transpiled ... [10:25:49.420] | : . | descend_wrappers() ... [10:25:49.420] | : . | : Call: [10:25:49.421] | : . | : base::eapply [10:25:49.421] | : . | : parse_call() ... [10:25:49.422] | : . | : . Function: base::eapply(...) [10:25:49.422] | : . | : parse_call() ... done [10:25:49.423] | : . | descend_wrappers() ... done [10:25:49.423] | : . | parse_call() ... [10:25:49.424] | : . | : Function: base::eapply(...) [10:25:49.424] | : . | parse_call() ... done [10:25:49.425] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.425] | : . | base::eapply [10:25:49.426] | : . Finding call to be transpiled ... done [10:25:49.426] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... [10:25:49.427] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.427] | : . | Transpiler description: base::eapply() transpiler [10:25:49.428] | : . | Transpiler function: [10:25:49.428] | : . | function (expr, options) [10:25:49.428] | : . | { [10:25:49.428] | : . | ns <- baseenv() [10:25:49.428] | : . | fcn <- get("eapply", mode = "function", envir = ns) [10:25:49.428] | : . | progressify_base(expr, fcn_name = "eapply", fcn = fcn, envir = parent.frame()) [10:25:49.428] | : . | } [10:25:49.428] | : . | [10:25:49.429] | : . Locating 'progressify::built-in' transpiler for base::eapply() of class 'function' ... done [10:25:49.429] | : get_transpiler() ... done [10:25:49.430] | : Transpile call expression ... [10:25:49.430] | : . local(base::eapply(env = { [10:25:49.430] | : . .progressr_progressor <- progressr::progressor(along = es) [10:25:49.430] | : . es [10:25:49.430] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:25:49.430] | : . on.exit(.progressr_progressor()) [10:25:49.430] | : . ...FUN(...) [10:25:49.430] | : . }, USE.NAMES = FALSE, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:25:49.431] | : Transpile call expression ... done [10:25:49.432] | : Evaluate transpiled call expression [10:25:49.432] | transpile() ... done [10:25:49.433] progressify() ... done === replicate ========================== replicate(10, { 42 }) --------------------------------- progressify(replicate(10, { 42 })) [10:25:49.434] progressify() ... [10:25:49.435] | transpile() ... [10:25:49.435] | : get_transpiler() ... [10:25:49.436] | : . Finding call to be transpiled ... [10:25:49.436] | : . | descend_wrappers() ... [10:25:49.437] | : . | : Call: [10:25:49.437] | : . | : replicate [10:25:49.438] | : . | : parse_call() ... [10:25:49.438] | : . | : . Function: replicate(...) [10:25:49.439] | : . | : . Locate function ... [10:25:49.439] | : . | : . | Function located in: 'base' [10:25:49.440] | : . | : . Locate function ... done [10:25:49.440] | : . | : parse_call() ... done [10:25:49.441] | : . | descend_wrappers() ... done [10:25:49.441] | : . | parse_call() ... [10:25:49.442] | : . | : Function: replicate(...) [10:25:49.442] | : . | : Locate function ... [10:25:49.443] | : . | : . Function located in: 'base' [10:25:49.443] | : . | : Locate function ... done [10:25:49.443] | : . | parse_call() ... done [10:25:49.444] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.444] | : . | replicate [10:25:49.445] | : . Finding call to be transpiled ... done [10:25:49.445] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.446] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.446] | : . | Transpiler description: base::replicate() transpiler [10:25:49.447] | : . | Transpiler function: [10:25:49.447] | : . | function (expr, options) [10:25:49.447] | : . | { [10:25:49.447] | : . | ns <- baseenv() [10:25:49.447] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.447] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.447] | : . | envir = parent.frame()) [10:25:49.447] | : . | } [10:25:49.447] | : . | [10:25:49.448] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.449] | : get_transpiler() ... done [10:25:49.449] | : Transpile call expression ... [10:25:49.450] | : . local(replicate({ [10:25:49.450] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.450] | : . 10 [10:25:49.450] | : . }, local({ [10:25:49.450] | : . on.exit(.progressr_progressor()) [10:25:49.450] | : . { [10:25:49.450] | : . 42 [10:25:49.450] | : . } [10:25:49.450] | : . }))) [10:25:49.450] | : Transpile call expression ... done [10:25:49.451] | : Evaluate transpiled call expression [10:25:49.452] | transpile() ... done [10:25:49.452] progressify() ... done num [1:10] 42 42 42 42 42 42 42 42 42 42 [10:25:49.453] progressify() ... [10:25:49.453] | transpile() ... [10:25:49.454] | : get_transpiler() ... [10:25:49.454] | : . Finding call to be transpiled ... [10:25:49.455] | : . | descend_wrappers() ... [10:25:49.455] | : . | : Call: [10:25:49.456] | : . | : replicate [10:25:49.456] | : . | : parse_call() ... [10:25:49.457] | : . | : . Function: replicate(...) [10:25:49.457] | : . | : . Locate function ... [10:25:49.458] | : . | : . | Function located in: 'base' [10:25:49.458] | : . | : . Locate function ... done [10:25:49.459] | : . | : parse_call() ... done [10:25:49.459] | : . | descend_wrappers() ... done [10:25:49.460] | : . | parse_call() ... [10:25:49.460] | : . | : Function: replicate(...) [10:25:49.461] | : . | : Locate function ... [10:25:49.461] | : . | : . Function located in: 'base' [10:25:49.462] | : . | : Locate function ... done [10:25:49.462] | : . | parse_call() ... done [10:25:49.462] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.463] | : . | replicate [10:25:49.464] | : . Finding call to be transpiled ... done [10:25:49.464] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.464] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.465] | : . | Transpiler description: base::replicate() transpiler [10:25:49.465] | : . | Transpiler function: [10:25:49.466] | : . | function (expr, options) [10:25:49.466] | : . | { [10:25:49.466] | : . | ns <- baseenv() [10:25:49.466] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.466] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.466] | : . | envir = parent.frame()) [10:25:49.466] | : . | } [10:25:49.466] | : . | [10:25:49.467] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.467] | : get_transpiler() ... done [10:25:49.467] | : Transpile call expression ... [10:25:49.468] | : . local(replicate({ [10:25:49.468] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.468] | : . 10 [10:25:49.468] | : . }, local({ [10:25:49.468] | : . on.exit(.progressr_progressor()) [10:25:49.468] | : . { [10:25:49.468] | : . 42 [10:25:49.468] | : . } [10:25:49.468] | : . }))) [10:25:49.469] | : Transpile call expression ... done [10:25:49.469] | : Evaluate transpiled call expression [10:25:49.470] | transpile() ... done [10:25:49.471] progressify() ... done character(0) [10:25:49.471] progressify() ... [10:25:49.472] | transpile() ... [10:25:49.472] | : get_transpiler() ... [10:25:49.473] | : . Finding call to be transpiled ... [10:25:49.473] | : . | descend_wrappers() ... [10:25:49.473] | : . | : Call: [10:25:49.474] | : . | : replicate [10:25:49.474] | : . | : parse_call() ... [10:25:49.475] | : . | : . Function: replicate(...) [10:25:49.475] | : . | : . Locate function ... [10:25:49.476] | : . | : . | Function located in: 'base' [10:25:49.476] | : . | : . Locate function ... done [10:25:49.477] | : . | : parse_call() ... done [10:25:49.477] | : . | descend_wrappers() ... done [10:25:49.478] | : . | parse_call() ... [10:25:49.478] | : . | : Function: replicate(...) [10:25:49.479] | : . | : Locate function ... [10:25:49.479] | : . | : . Function located in: 'base' [10:25:49.480] | : . | : Locate function ... done [10:25:49.480] | : . | parse_call() ... done [10:25:49.481] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.481] | : . | replicate [10:25:49.482] | : . Finding call to be transpiled ... done [10:25:49.482] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.483] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.483] | : . | Transpiler description: base::replicate() transpiler [10:25:49.484] | : . | Transpiler function: [10:25:49.484] | : . | function (expr, options) [10:25:49.484] | : . | { [10:25:49.484] | : . | ns <- baseenv() [10:25:49.484] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.484] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.484] | : . | envir = parent.frame()) [10:25:49.484] | : . | } [10:25:49.484] | : . | [10:25:49.485] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.485] | : get_transpiler() ... done [10:25:49.486] | : Transpile call expression ... [10:25:49.486] | : . local(replicate({ [10:25:49.486] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.486] | : . 10 [10:25:49.486] | : . }, local({ [10:25:49.486] | : . on.exit(.progressr_progressor()) [10:25:49.486] | : . { [10:25:49.486] | : . 42 [10:25:49.486] | : . } [10:25:49.486] | : . }))) [10:25:49.487] | : Transpile call expression ... done [10:25:49.488] | : Evaluate transpiled call expression [10:25:49.488] | transpile() ... done [10:25:49.489] progressify() ... done === replicate ========================== replicate(n = 10, { 1 + 2 }) --------------------------------- progressify(replicate(n = 10, { 1 + 2 })) [10:25:49.491] progressify() ... [10:25:49.492] | transpile() ... [10:25:49.492] | : get_transpiler() ... [10:25:49.493] | : . Finding call to be transpiled ... [10:25:49.493] | : . | descend_wrappers() ... [10:25:49.494] | : . | : Call: [10:25:49.494] | : . | : replicate [10:25:49.495] | : . | : parse_call() ... [10:25:49.495] | : . | : . Function: replicate(...) [10:25:49.496] | : . | : . Locate function ... [10:25:49.496] | : . | : . | Function located in: 'base' [10:25:49.497] | : . | : . Locate function ... done [10:25:49.497] | : . | : parse_call() ... done [10:25:49.498] | : . | descend_wrappers() ... done [10:25:49.498] | : . | parse_call() ... [10:25:49.498] | : . | : Function: replicate(...) [10:25:49.499] | : . | : Locate function ... [10:25:49.499] | : . | : . Function located in: 'base' [10:25:49.500] | : . | : Locate function ... done [10:25:49.500] | : . | parse_call() ... done [10:25:49.501] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.501] | : . | replicate [10:25:49.502] | : . Finding call to be transpiled ... done [10:25:49.502] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.503] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.503] | : . | Transpiler description: base::replicate() transpiler [10:25:49.504] | : . | Transpiler function: [10:25:49.504] | : . | function (expr, options) [10:25:49.504] | : . | { [10:25:49.504] | : . | ns <- baseenv() [10:25:49.504] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.504] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.504] | : . | envir = parent.frame()) [10:25:49.504] | : . | } [10:25:49.504] | : . | [10:25:49.505] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.505] | : get_transpiler() ... done [10:25:49.506] | : Transpile call expression ... [10:25:49.506] | : . local(replicate(n = { [10:25:49.506] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.506] | : . 10 [10:25:49.506] | : . }, local({ [10:25:49.506] | : . on.exit(.progressr_progressor()) [10:25:49.506] | : . { [10:25:49.506] | : . 1 + 2 [10:25:49.506] | : . } [10:25:49.506] | : . }))) [10:25:49.507] | : Transpile call expression ... done [10:25:49.508] | : Evaluate transpiled call expression [10:25:49.508] | transpile() ... done [10:25:49.509] progressify() ... done num [1:10] 3 3 3 3 3 3 3 3 3 3 [10:25:49.510] progressify() ... [10:25:49.510] | transpile() ... [10:25:49.511] | : get_transpiler() ... [10:25:49.511] | : . Finding call to be transpiled ... [10:25:49.512] | : . | descend_wrappers() ... [10:25:49.512] | : . | : Call: [10:25:49.513] | : . | : replicate [10:25:49.513] | : . | : parse_call() ... [10:25:49.514] | : . | : . Function: replicate(...) [10:25:49.514] | : . | : . Locate function ... [10:25:49.515] | : . | : . | Function located in: 'base' [10:25:49.515] | : . | : . Locate function ... done [10:25:49.516] | : . | : parse_call() ... done [10:25:49.516] | : . | descend_wrappers() ... done [10:25:49.516] | : . | parse_call() ... [10:25:49.517] | : . | : Function: replicate(...) [10:25:49.517] | : . | : Locate function ... [10:25:49.518] | : . | : . Function located in: 'base' [10:25:49.518] | : . | : Locate function ... done [10:25:49.519] | : . | parse_call() ... done [10:25:49.519] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.520] | : . | replicate [10:25:49.520] | : . Finding call to be transpiled ... done [10:25:49.521] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.521] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.522] | : . | Transpiler description: base::replicate() transpiler [10:25:49.522] | : . | Transpiler function: [10:25:49.523] | : . | function (expr, options) [10:25:49.523] | : . | { [10:25:49.523] | : . | ns <- baseenv() [10:25:49.523] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.523] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.523] | : . | envir = parent.frame()) [10:25:49.523] | : . | } [10:25:49.523] | : . | [10:25:49.523] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.524] | : get_transpiler() ... done [10:25:49.524] | : Transpile call expression ... [10:25:49.525] | : . local(replicate(n = { [10:25:49.525] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.525] | : . 10 [10:25:49.525] | : . }, local({ [10:25:49.525] | : . on.exit(.progressr_progressor()) [10:25:49.525] | : . { [10:25:49.525] | : . 1 + 2 [10:25:49.525] | : . } [10:25:49.525] | : . }))) [10:25:49.526] | : Transpile call expression ... done [10:25:49.526] | : Evaluate transpiled call expression [10:25:49.527] | transpile() ... done [10:25:49.527] progressify() ... done character(0) [10:25:49.528] progressify() ... [10:25:49.528] | transpile() ... [10:25:49.529] | : get_transpiler() ... [10:25:49.529] | : . Finding call to be transpiled ... [10:25:49.530] | : . | descend_wrappers() ... [10:25:49.530] | : . | : Call: [10:25:49.531] | : . | : replicate [10:25:49.531] | : . | : parse_call() ... [10:25:49.532] | : . | : . Function: replicate(...) [10:25:49.532] | : . | : . Locate function ... [10:25:49.533] | : . | : . | Function located in: 'base' [10:25:49.533] | : . | : . Locate function ... done [10:25:49.534] | : . | : parse_call() ... done [10:25:49.534] | : . | descend_wrappers() ... done [10:25:49.535] | : . | parse_call() ... [10:25:49.535] | : . | : Function: replicate(...) [10:25:49.535] | : . | : Locate function ... [10:25:49.536] | : . | : . Function located in: 'base' [10:25:49.536] | : . | : Locate function ... done [10:25:49.537] | : . | parse_call() ... done [10:25:49.537] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.538] | : . | replicate [10:25:49.538] | : . Finding call to be transpiled ... done [10:25:49.539] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.540] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.540] | : . | Transpiler description: base::replicate() transpiler [10:25:49.540] | : . | Transpiler function: [10:25:49.541] | : . | function (expr, options) [10:25:49.541] | : . | { [10:25:49.541] | : . | ns <- baseenv() [10:25:49.541] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.541] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.541] | : . | envir = parent.frame()) [10:25:49.541] | : . | } [10:25:49.541] | : . | [10:25:49.542] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.542] | : get_transpiler() ... done [10:25:49.543] | : Transpile call expression ... [10:25:49.543] | : . local(replicate(n = { [10:25:49.543] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.543] | : . 10 [10:25:49.543] | : . }, local({ [10:25:49.543] | : . on.exit(.progressr_progressor()) [10:25:49.543] | : . { [10:25:49.543] | : . 1 + 2 [10:25:49.543] | : . } [10:25:49.543] | : . }))) [10:25:49.544] | : Transpile call expression ... done [10:25:49.544] | : Evaluate transpiled call expression [10:25:49.545] | transpile() ... done [10:25:49.546] progressify() ... done === replicate ========================== base::replicate(n = 10, 3 + 4) --------------------------------- progressify(base::replicate(n = 10, 3 + 4)) [10:25:49.547] progressify() ... [10:25:49.548] | transpile() ... [10:25:49.548] | : get_transpiler() ... [10:25:49.549] | : . Finding call to be transpiled ... [10:25:49.549] | : . | descend_wrappers() ... [10:25:49.550] | : . | : Call: [10:25:49.550] | : . | : base::replicate [10:25:49.551] | : . | : parse_call() ... [10:25:49.551] | : . | : . Function: base::replicate(...) [10:25:49.552] | : . | : parse_call() ... done [10:25:49.552] | : . | descend_wrappers() ... done [10:25:49.552] | : . | parse_call() ... [10:25:49.553] | : . | : Function: base::replicate(...) [10:25:49.553] | : . | parse_call() ... done [10:25:49.554] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.554] | : . | base::replicate [10:25:49.555] | : . Finding call to be transpiled ... done [10:25:49.555] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.556] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.556] | : . | Transpiler description: base::replicate() transpiler [10:25:49.557] | : . | Transpiler function: [10:25:49.557] | : . | function (expr, options) [10:25:49.557] | : . | { [10:25:49.557] | : . | ns <- baseenv() [10:25:49.557] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.557] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.557] | : . | envir = parent.frame()) [10:25:49.557] | : . | } [10:25:49.557] | : . | [10:25:49.558] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.559] | : get_transpiler() ... done [10:25:49.559] | : Transpile call expression ... [10:25:49.560] | : . local(base::replicate(n = { [10:25:49.560] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.560] | : . 10 [10:25:49.560] | : . }, local({ [10:25:49.560] | : . on.exit(.progressr_progressor()) [10:25:49.560] | : . 3 + 4 [10:25:49.560] | : . }))) [10:25:49.561] | : Transpile call expression ... done [10:25:49.561] | : Evaluate transpiled call expression [10:25:49.562] | transpile() ... done [10:25:49.562] progressify() ... done num [1:10] 7 7 7 7 7 7 7 7 7 7 [10:25:49.563] progressify() ... [10:25:49.563] | transpile() ... [10:25:49.564] | : get_transpiler() ... [10:25:49.564] | : . Finding call to be transpiled ... [10:25:49.565] | : . | descend_wrappers() ... [10:25:49.565] | : . | : Call: [10:25:49.566] | : . | : base::replicate [10:25:49.566] | : . | : parse_call() ... [10:25:49.567] | : . | : . Function: base::replicate(...) [10:25:49.567] | : . | : parse_call() ... done [10:25:49.569] | : . | descend_wrappers() ... done [10:25:49.569] | : . | parse_call() ... [10:25:49.570] | : . | : Function: base::replicate(...) [10:25:49.570] | : . | parse_call() ... done [10:25:49.571] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.571] | : . | base::replicate [10:25:49.572] | : . Finding call to be transpiled ... done [10:25:49.572] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.573] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.573] | : . | Transpiler description: base::replicate() transpiler [10:25:49.574] | : . | Transpiler function: [10:25:49.574] | : . | function (expr, options) [10:25:49.574] | : . | { [10:25:49.574] | : . | ns <- baseenv() [10:25:49.574] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.574] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.574] | : . | envir = parent.frame()) [10:25:49.574] | : . | } [10:25:49.574] | : . | [10:25:49.575] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.575] | : get_transpiler() ... done [10:25:49.576] | : Transpile call expression ... [10:25:49.576] | : . local(base::replicate(n = { [10:25:49.576] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.576] | : . 10 [10:25:49.576] | : . }, local({ [10:25:49.576] | : . on.exit(.progressr_progressor()) [10:25:49.576] | : . 3 + 4 [10:25:49.576] | : . }))) [10:25:49.577] | : Transpile call expression ... done [10:25:49.578] | : Evaluate transpiled call expression [10:25:49.578] | transpile() ... done [10:25:49.579] progressify() ... done character(0) [10:25:49.579] progressify() ... [10:25:49.580] | transpile() ... [10:25:49.580] | : get_transpiler() ... [10:25:49.581] | : . Finding call to be transpiled ... [10:25:49.581] | : . | descend_wrappers() ... [10:25:49.582] | : . | : Call: [10:25:49.582] | : . | : base::replicate [10:25:49.583] | : . | : parse_call() ... [10:25:49.583] | : . | : . Function: base::replicate(...) [10:25:49.584] | : . | : parse_call() ... done [10:25:49.584] | : . | descend_wrappers() ... done [10:25:49.585] | : . | parse_call() ... [10:25:49.585] | : . | : Function: base::replicate(...) [10:25:49.586] | : . | parse_call() ... done [10:25:49.586] | : . | Position of call to be transpiled in expression: c(1) [10:25:49.586] | : . | base::replicate [10:25:49.587] | : . Finding call to be transpiled ... done [10:25:49.587] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... [10:25:49.588] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:25:49.588] | : . | Transpiler description: base::replicate() transpiler [10:25:49.589] | : . | Transpiler function: [10:25:49.589] | : . | function (expr, options) [10:25:49.589] | : . | { [10:25:49.589] | : . | ns <- baseenv() [10:25:49.589] | : . | fcn <- get("replicate", mode = "function", envir = ns) [10:25:49.589] | : . | progressify_base(expr, fcn_name = "replicate", fcn = fcn, [10:25:49.589] | : . | envir = parent.frame()) [10:25:49.589] | : . | } [10:25:49.589] | : . | [10:25:49.590] | : . Locating 'progressify::built-in' transpiler for base::replicate() of class 'function' ... done [10:25:49.591] | : get_transpiler() ... done [10:25:49.591] | : Transpile call expression ... [10:25:49.592] | : . local(base::replicate(n = { [10:25:49.592] | : . .progressr_progressor <- progressr::progressor(steps = 10) [10:25:49.592] | : . 10 [10:25:49.592] | : . }, local({ [10:25:49.592] | : . on.exit(.progressr_progressor()) [10:25:49.592] | : . 3 + 4 [10:25:49.592] | : . }))) [10:25:49.593] | : Transpile call expression ... done [10:25:49.593] | : Evaluate transpiled call expression [10:25:49.594] | transpile() ... done [10:25:49.594] progressify() ... done Test time: user.self=0.7s, sys.self=0.2s, elapsed=0.8s, user.child=NAs, sys.child=NAs Test 'progressify-base' ... success > > proc.time() user system elapsed 0.9 0.2 1.1