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-stats.R > ## Don't edit - it was autogenerated by inst/testme/deploy.R > progressify:::testme("progressify-stats") Test 'progressify-stats' ... chr "none" > if (requireNamespace("stats")) { + library(progressify) + options(progressify.debug = TRUE) + d <- as.dendrogram(hclust(dist(USArrests)) .... [TRUNCATED] Loading required package: progressr === dendrapply ========================== dendrapply(d, FUN) --------------------------------- progressify(dendrapply(d, FUN)) [10:26:42.507] progressify() ... [10:26:42.509] | transpile() ... [10:26:42.509] | : get_transpiler() ... [10:26:42.510] | : . Finding call to be transpiled ... [10:26:42.510] | : . | descend_wrappers() ... [10:26:42.511] | : . | : Call: [10:26:42.511] | : . | : dendrapply [10:26:42.512] | : . | : parse_call() ... [10:26:42.513] | : . | : . Function: dendrapply(...) [10:26:42.513] | : . | : . Locate function ... [10:26:42.514] | : . | : . | Function located in: 'stats' [10:26:42.514] | : . | : . Locate function ... done [10:26:42.515] | : . | : parse_call() ... done [10:26:42.515] | : . | descend_wrappers() ... done [10:26:42.516] | : . | parse_call() ... [10:26:42.516] | : . | : Function: dendrapply(...) [10:26:42.517] | : . | : Locate function ... [10:26:42.517] | : . | : . Function located in: 'stats' [10:26:42.518] | : . | : Locate function ... done [10:26:42.518] | : . | parse_call() ... done [10:26:42.519] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.519] | : . | dendrapply [10:26:42.520] | : . Finding call to be transpiled ... done [10:26:42.520] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.521] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.521] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.522] | : . | Transpiler function: [10:26:42.522] | : . | function (expr, options) [10:26:42.522] | : . | { [10:26:42.522] | : . | ns <- getNamespace("stats") [10:26:42.522] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.522] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.522] | : . | envir = parent.frame()) [10:26:42.522] | : . | } [10:26:42.522] | : . | [10:26:42.523] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.523] | : get_transpiler() ... done [10:26:42.524] | : Transpile call expression ... [10:26:42.525] | : . local(dendrapply({ [10:26:42.525] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.525] | : . attr(d, "members") - 1L) [10:26:42.525] | : . d [10:26:42.525] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.525] | : . on.exit(.progressr_progressor()) [10:26:42.525] | : . ...FUN(...) [10:26:42.525] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.526] | : Transpile call expression ... done [10:26:42.526] | : Evaluate transpiled call expression [10:26:42.529] | transpile() ... done [10:26:42.529] progressify() ... done --[dendrogram w/ 2 branches and 50 members at h = 294] |--[dendrogram w/ 2 branches and 16 members at h = 103] | |--[dendrogram w/ 2 branches and 2 members at h = 38.5] | | |--leaf "Florida" ( tested = TRUE ) | | `--leaf "North Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 14 members at h = 65] | |--[dendrogram w/ 2 branches and 6 members at h = 48.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 17] | | | |--leaf "Delaware" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 15.5] | | | |--leaf "Alabama" ( tested = TRUE ) | | | `--leaf "Louisiana" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 28.6] | | |--leaf "Alaska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 21.2] | | |--leaf "Mississippi" ( tested = TRUE ) | | `--leaf "South Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 53.6] | |--[dendrogram w/ 2 branches and 3 members at h = 15.9] | | |--leaf "Maryland" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 13.9] | | |--leaf "Arizona" ( tested = TRUE ) | | `--leaf "New Mexico" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 5 members at h = 32.7] | |--leaf "California" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 22.4] | |--[dendrogram w/ 2 branches and 2 members at h = 6.24] | | |--leaf "Illinois" ( tested = TRUE ) | | `--leaf "New York" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 13.3] | |--leaf "Michigan" ( tested = TRUE ) | `--leaf "Nevada" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 34 members at h = 169] |--[dendrogram w/ 2 branches and 14 members at h = 68.8] | |--[dendrogram w/ 2 branches and 6 members at h = 36.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 24.9] | | | |--leaf "Missouri" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 12.6] | | | |--leaf "Arkansas" ( tested = TRUE ) | | | `--leaf "Tennessee" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 25.1] | | |--leaf "Georgia" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 14.5] | | |--leaf "Colorado" ( tested = TRUE ) | | `--leaf "Texas" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 36.8] | |--leaf "Rhode Island" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 7 members at h = 29.3] | |--[dendrogram w/ 2 branches and 4 members at h = 15.6] | | |--leaf "Wyoming" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 12.4] | | |--leaf "Oregon" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 7.36] | | |--leaf "Oklahoma" ( tested = TRUE ) | | `--leaf "Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 22.8] | |--leaf "Washington" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 11.5] | |--leaf "Massachusetts" ( tested = TRUE ) | `--leaf "New Jersey" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 20 members at h = 87.3] |--[dendrogram w/ 2 branches and 10 members at h = 31.5] | |--[dendrogram w/ 2 branches and 4 members at h = 18.3] | | |--[dendrogram w/ 2 branches and 2 members at h = 6.64] | | | |--leaf "Ohio" ( tested = TRUE ) | | | `--leaf "Utah" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 8.03] | | |--leaf "Connecticut" ( tested = TRUE ) | | `--leaf "Pennsylvania" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 6 members at h = 19.9] | |--[dendrogram w/ 2 branches and 3 members at h = 13.3] | | |--leaf "Nebraska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 3.83] | | |--leaf "Kentucky" ( tested = TRUE ) | | `--leaf "Montana" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 15.4] | |--leaf "Idaho" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 3.93] | |--leaf "Indiana" ( tested = TRUE ) | `--leaf "Kansas" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 10 members at h = 57.3] |--[dendrogram w/ 2 branches and 5 members at h = 31.6] | |--leaf "Hawaii" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 19.4] | |--leaf "Minnesota" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 10.9] | |--leaf "Wisconsin" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 2.29] | |--leaf "Iowa" ( tested = TRUE ) | `--leaf "New Hampshire" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 5 members at h = 41.5] |--[dendrogram w/ 2 branches and 3 members at h = 12.8] | |--leaf "West Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 8.54] | |--leaf "Maine" ( tested = TRUE ) | `--leaf "South Dakota" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 2 members at h = 13] |--leaf "North Dakota" ( tested = TRUE ) `--leaf "Vermont" ( tested = TRUE ) [10:26:42.543] progressify() ... [10:26:42.543] | transpile() ... [10:26:42.544] | : get_transpiler() ... [10:26:42.544] | : . Finding call to be transpiled ... [10:26:42.545] | : . | descend_wrappers() ... [10:26:42.545] | : . | : Call: [10:26:42.546] | : . | : dendrapply [10:26:42.546] | : . | : parse_call() ... [10:26:42.547] | : . | : . Function: dendrapply(...) [10:26:42.547] | : . | : . Locate function ... [10:26:42.548] | : . | : . | Function located in: 'stats' [10:26:42.548] | : . | : . Locate function ... done [10:26:42.549] | : . | : parse_call() ... done [10:26:42.549] | : . | descend_wrappers() ... done [10:26:42.550] | : . | parse_call() ... [10:26:42.550] | : . | : Function: dendrapply(...) [10:26:42.551] | : . | : Locate function ... [10:26:42.551] | : . | : . Function located in: 'stats' [10:26:42.552] | : . | : Locate function ... done [10:26:42.552] | : . | parse_call() ... done [10:26:42.552] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.553] | : . | dendrapply [10:26:42.554] | : . Finding call to be transpiled ... done [10:26:42.554] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.554] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.555] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.555] | : . | Transpiler function: [10:26:42.556] | : . | function (expr, options) [10:26:42.556] | : . | { [10:26:42.556] | : . | ns <- getNamespace("stats") [10:26:42.556] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.556] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.556] | : . | envir = parent.frame()) [10:26:42.556] | : . | } [10:26:42.556] | : . | [10:26:42.557] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.557] | : get_transpiler() ... done [10:26:42.558] | : Transpile call expression ... [10:26:42.558] | : . local(dendrapply({ [10:26:42.558] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.558] | : . attr(d, "members") - 1L) [10:26:42.558] | : . d [10:26:42.558] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.558] | : . on.exit(.progressr_progressor()) [10:26:42.558] | : . ...FUN(...) [10:26:42.558] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.562] | : Transpile call expression ... done [10:26:42.563] | : Evaluate transpiled call expression [10:26:42.567] | transpile() ... done [10:26:42.568] progressify() ... done character(0) [10:26:42.569] progressify() ... [10:26:42.569] | transpile() ... [10:26:42.570] | : get_transpiler() ... [10:26:42.571] | : . Finding call to be transpiled ... [10:26:42.571] | : . | descend_wrappers() ... [10:26:42.572] | : . | : Call: [10:26:42.572] | : . | : dendrapply [10:26:42.573] | : . | : parse_call() ... [10:26:42.573] | : . | : . Function: dendrapply(...) [10:26:42.574] | : . | : . Locate function ... [10:26:42.575] | : . | : . | Function located in: 'stats' [10:26:42.575] | : . | : . Locate function ... done [10:26:42.576] | : . | : parse_call() ... done [10:26:42.576] | : . | descend_wrappers() ... done [10:26:42.577] | : . | parse_call() ... [10:26:42.577] | : . | : Function: dendrapply(...) [10:26:42.578] | : . | : Locate function ... [10:26:42.578] | : . | : . Function located in: 'stats' [10:26:42.579] | : . | : Locate function ... done [10:26:42.579] | : . | parse_call() ... done [10:26:42.580] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.580] | : . | dendrapply [10:26:42.581] | : . Finding call to be transpiled ... done [10:26:42.582] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.582] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.583] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.583] | : . | Transpiler function: [10:26:42.584] | : . | function (expr, options) [10:26:42.584] | : . | { [10:26:42.584] | : . | ns <- getNamespace("stats") [10:26:42.584] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.584] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.584] | : . | envir = parent.frame()) [10:26:42.584] | : . | } [10:26:42.584] | : . | [10:26:42.584] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.585] | : get_transpiler() ... done [10:26:42.586] | : Transpile call expression ... [10:26:42.586] | : . local(dendrapply({ [10:26:42.586] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.586] | : . attr(d, "members") - 1L) [10:26:42.586] | : . d [10:26:42.586] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.586] | : . on.exit(.progressr_progressor()) [10:26:42.586] | : . ...FUN(...) [10:26:42.586] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.587] | : Transpile call expression ... done [10:26:42.588] | : Evaluate transpiled call expression [10:26:42.591] | transpile() ... done [10:26:42.592] progressify() ... done === dendrapply ========================== stats::dendrapply(d, FUN) --------------------------------- progressify(stats::dendrapply(d, FUN)) [10:26:42.595] progressify() ... [10:26:42.596] | transpile() ... [10:26:42.596] | : get_transpiler() ... [10:26:42.597] | : . Finding call to be transpiled ... [10:26:42.597] | : . | descend_wrappers() ... [10:26:42.598] | : . | : Call: [10:26:42.599] | : . | : stats::dendrapply [10:26:42.599] | : . | : parse_call() ... [10:26:42.600] | : . | : . Function: stats::dendrapply(...) [10:26:42.600] | : . | : parse_call() ... done [10:26:42.601] | : . | descend_wrappers() ... done [10:26:42.601] | : . | parse_call() ... [10:26:42.602] | : . | : Function: stats::dendrapply(...) [10:26:42.603] | : . | parse_call() ... done [10:26:42.603] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.604] | : . | stats::dendrapply [10:26:42.604] | : . Finding call to be transpiled ... done [10:26:42.605] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.605] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.606] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.607] | : . | Transpiler function: [10:26:42.607] | : . | function (expr, options) [10:26:42.607] | : . | { [10:26:42.607] | : . | ns <- getNamespace("stats") [10:26:42.607] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.607] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.607] | : . | envir = parent.frame()) [10:26:42.607] | : . | } [10:26:42.607] | : . | [10:26:42.608] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.608] | : get_transpiler() ... done [10:26:42.609] | : Transpile call expression ... [10:26:42.610] | : . local(stats::dendrapply({ [10:26:42.610] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.610] | : . attr(d, "members") - 1L) [10:26:42.610] | : . d [10:26:42.610] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.610] | : . on.exit(.progressr_progressor()) [10:26:42.610] | : . ...FUN(...) [10:26:42.610] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.611] | : Transpile call expression ... done [10:26:42.612] | : Evaluate transpiled call expression [10:26:42.616] | transpile() ... done [10:26:42.616] progressify() ... done --[dendrogram w/ 2 branches and 50 members at h = 294] |--[dendrogram w/ 2 branches and 16 members at h = 103] | |--[dendrogram w/ 2 branches and 2 members at h = 38.5] | | |--leaf "Florida" ( tested = TRUE ) | | `--leaf "North Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 14 members at h = 65] | |--[dendrogram w/ 2 branches and 6 members at h = 48.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 17] | | | |--leaf "Delaware" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 15.5] | | | |--leaf "Alabama" ( tested = TRUE ) | | | `--leaf "Louisiana" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 28.6] | | |--leaf "Alaska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 21.2] | | |--leaf "Mississippi" ( tested = TRUE ) | | `--leaf "South Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 53.6] | |--[dendrogram w/ 2 branches and 3 members at h = 15.9] | | |--leaf "Maryland" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 13.9] | | |--leaf "Arizona" ( tested = TRUE ) | | `--leaf "New Mexico" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 5 members at h = 32.7] | |--leaf "California" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 22.4] | |--[dendrogram w/ 2 branches and 2 members at h = 6.24] | | |--leaf "Illinois" ( tested = TRUE ) | | `--leaf "New York" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 13.3] | |--leaf "Michigan" ( tested = TRUE ) | `--leaf "Nevada" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 34 members at h = 169] |--[dendrogram w/ 2 branches and 14 members at h = 68.8] | |--[dendrogram w/ 2 branches and 6 members at h = 36.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 24.9] | | | |--leaf "Missouri" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 12.6] | | | |--leaf "Arkansas" ( tested = TRUE ) | | | `--leaf "Tennessee" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 25.1] | | |--leaf "Georgia" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 14.5] | | |--leaf "Colorado" ( tested = TRUE ) | | `--leaf "Texas" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 36.8] | |--leaf "Rhode Island" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 7 members at h = 29.3] | |--[dendrogram w/ 2 branches and 4 members at h = 15.6] | | |--leaf "Wyoming" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 12.4] | | |--leaf "Oregon" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 7.36] | | |--leaf "Oklahoma" ( tested = TRUE ) | | `--leaf "Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 22.8] | |--leaf "Washington" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 11.5] | |--leaf "Massachusetts" ( tested = TRUE ) | `--leaf "New Jersey" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 20 members at h = 87.3] |--[dendrogram w/ 2 branches and 10 members at h = 31.5] | |--[dendrogram w/ 2 branches and 4 members at h = 18.3] | | |--[dendrogram w/ 2 branches and 2 members at h = 6.64] | | | |--leaf "Ohio" ( tested = TRUE ) | | | `--leaf "Utah" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 8.03] | | |--leaf "Connecticut" ( tested = TRUE ) | | `--leaf "Pennsylvania" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 6 members at h = 19.9] | |--[dendrogram w/ 2 branches and 3 members at h = 13.3] | | |--leaf "Nebraska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 3.83] | | |--leaf "Kentucky" ( tested = TRUE ) | | `--leaf "Montana" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 15.4] | |--leaf "Idaho" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 3.93] | |--leaf "Indiana" ( tested = TRUE ) | `--leaf "Kansas" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 10 members at h = 57.3] |--[dendrogram w/ 2 branches and 5 members at h = 31.6] | |--leaf "Hawaii" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 19.4] | |--leaf "Minnesota" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 10.9] | |--leaf "Wisconsin" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 2.29] | |--leaf "Iowa" ( tested = TRUE ) | `--leaf "New Hampshire" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 5 members at h = 41.5] |--[dendrogram w/ 2 branches and 3 members at h = 12.8] | |--leaf "West Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 8.54] | |--leaf "Maine" ( tested = TRUE ) | `--leaf "South Dakota" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 2 members at h = 13] |--leaf "North Dakota" ( tested = TRUE ) `--leaf "Vermont" ( tested = TRUE ) [10:26:42.637] progressify() ... [10:26:42.637] | transpile() ... [10:26:42.638] | : get_transpiler() ... [10:26:42.638] | : . Finding call to be transpiled ... [10:26:42.639] | : . | descend_wrappers() ... [10:26:42.639] | : . | : Call: [10:26:42.640] | : . | : stats::dendrapply [10:26:42.641] | : . | : parse_call() ... [10:26:42.641] | : . | : . Function: stats::dendrapply(...) [10:26:42.642] | : . | : parse_call() ... done [10:26:42.642] | : . | descend_wrappers() ... done [10:26:42.643] | : . | parse_call() ... [10:26:42.643] | : . | : Function: stats::dendrapply(...) [10:26:42.644] | : . | parse_call() ... done [10:26:42.644] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.645] | : . | stats::dendrapply [10:26:42.645] | : . Finding call to be transpiled ... done [10:26:42.646] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.646] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.647] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.647] | : . | Transpiler function: [10:26:42.648] | : . | function (expr, options) [10:26:42.648] | : . | { [10:26:42.648] | : . | ns <- getNamespace("stats") [10:26:42.648] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.648] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.648] | : . | envir = parent.frame()) [10:26:42.648] | : . | } [10:26:42.648] | : . | [10:26:42.648] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.649] | : get_transpiler() ... done [10:26:42.649] | : Transpile call expression ... [10:26:42.650] | : . local(stats::dendrapply({ [10:26:42.650] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.650] | : . attr(d, "members") - 1L) [10:26:42.650] | : . d [10:26:42.650] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.650] | : . on.exit(.progressr_progressor()) [10:26:42.650] | : . ...FUN(...) [10:26:42.650] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.651] | : Transpile call expression ... done [10:26:42.652] | : Evaluate transpiled call expression [10:26:42.655] | transpile() ... done [10:26:42.655] progressify() ... done character(0) [10:26:42.656] progressify() ... [10:26:42.656] | transpile() ... [10:26:42.657] | : get_transpiler() ... [10:26:42.657] | : . Finding call to be transpiled ... [10:26:42.658] | : . | descend_wrappers() ... [10:26:42.658] | : . | : Call: [10:26:42.659] | : . | : stats::dendrapply [10:26:42.659] | : . | : parse_call() ... [10:26:42.660] | : . | : . Function: stats::dendrapply(...) [10:26:42.660] | : . | : parse_call() ... done [10:26:42.661] | : . | descend_wrappers() ... done [10:26:42.661] | : . | parse_call() ... [10:26:42.662] | : . | : Function: stats::dendrapply(...) [10:26:42.662] | : . | parse_call() ... done [10:26:42.663] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.663] | : . | stats::dendrapply [10:26:42.664] | : . Finding call to be transpiled ... done [10:26:42.664] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.665] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.665] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.666] | : . | Transpiler function: [10:26:42.666] | : . | function (expr, options) [10:26:42.666] | : . | { [10:26:42.666] | : . | ns <- getNamespace("stats") [10:26:42.666] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.666] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.666] | : . | envir = parent.frame()) [10:26:42.666] | : . | } [10:26:42.666] | : . | [10:26:42.667] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.668] | : get_transpiler() ... done [10:26:42.668] | : Transpile call expression ... [10:26:42.669] | : . local(stats::dendrapply({ [10:26:42.669] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.669] | : . attr(d, "members") - 1L) [10:26:42.669] | : . d [10:26:42.669] | : . }, function(..., ...FUN, .progressr_progressor) { [10:26:42.669] | : . on.exit(.progressr_progressor()) [10:26:42.669] | : . ...FUN(...) [10:26:42.669] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.670] | : Transpile call expression ... done [10:26:42.670] | : Evaluate transpiled call expression [10:26:42.673] | transpile() ... done [10:26:42.673] progressify() ... done === dendrapply ========================== stats::dendrapply(X = d, FUN = FUN) --------------------------------- progressify(stats::dendrapply(X = d, FUN = FUN)) [10:26:42.676] progressify() ... [10:26:42.677] | transpile() ... [10:26:42.677] | : get_transpiler() ... [10:26:42.678] | : . Finding call to be transpiled ... [10:26:42.678] | : . | descend_wrappers() ... [10:26:42.679] | : . | : Call: [10:26:42.679] | : . | : stats::dendrapply [10:26:42.681] | : . | : parse_call() ... [10:26:42.682] | : . | : . Function: stats::dendrapply(...) [10:26:42.682] | : . | : parse_call() ... done [10:26:42.683] | : . | descend_wrappers() ... done [10:26:42.683] | : . | parse_call() ... [10:26:42.684] | : . | : Function: stats::dendrapply(...) [10:26:42.685] | : . | parse_call() ... done [10:26:42.685] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.685] | : . | stats::dendrapply [10:26:42.686] | : . Finding call to be transpiled ... done [10:26:42.687] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.687] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.688] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.688] | : . | Transpiler function: [10:26:42.689] | : . | function (expr, options) [10:26:42.689] | : . | { [10:26:42.689] | : . | ns <- getNamespace("stats") [10:26:42.689] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.689] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.689] | : . | envir = parent.frame()) [10:26:42.689] | : . | } [10:26:42.689] | : . | [10:26:42.689] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.690] | : get_transpiler() ... done [10:26:42.690] | : Transpile call expression ... [10:26:42.691] | : . local(stats::dendrapply(X = { [10:26:42.691] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.691] | : . attr(d, "members") - 1L) [10:26:42.691] | : . d [10:26:42.691] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:26:42.691] | : . on.exit(.progressr_progressor()) [10:26:42.691] | : . ...FUN(...) [10:26:42.691] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.692] | : Transpile call expression ... done [10:26:42.692] | : Evaluate transpiled call expression [10:26:42.695] | transpile() ... done [10:26:42.695] progressify() ... done --[dendrogram w/ 2 branches and 50 members at h = 294] |--[dendrogram w/ 2 branches and 16 members at h = 103] | |--[dendrogram w/ 2 branches and 2 members at h = 38.5] | | |--leaf "Florida" ( tested = TRUE ) | | `--leaf "North Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 14 members at h = 65] | |--[dendrogram w/ 2 branches and 6 members at h = 48.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 17] | | | |--leaf "Delaware" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 15.5] | | | |--leaf "Alabama" ( tested = TRUE ) | | | `--leaf "Louisiana" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 28.6] | | |--leaf "Alaska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 21.2] | | |--leaf "Mississippi" ( tested = TRUE ) | | `--leaf "South Carolina" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 53.6] | |--[dendrogram w/ 2 branches and 3 members at h = 15.9] | | |--leaf "Maryland" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 13.9] | | |--leaf "Arizona" ( tested = TRUE ) | | `--leaf "New Mexico" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 5 members at h = 32.7] | |--leaf "California" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 22.4] | |--[dendrogram w/ 2 branches and 2 members at h = 6.24] | | |--leaf "Illinois" ( tested = TRUE ) | | `--leaf "New York" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 13.3] | |--leaf "Michigan" ( tested = TRUE ) | `--leaf "Nevada" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 34 members at h = 169] |--[dendrogram w/ 2 branches and 14 members at h = 68.8] | |--[dendrogram w/ 2 branches and 6 members at h = 36.7] | | |--[dendrogram w/ 2 branches and 3 members at h = 24.9] | | | |--leaf "Missouri" ( tested = TRUE ) | | | `--[dendrogram w/ 2 branches and 2 members at h = 12.6] | | | |--leaf "Arkansas" ( tested = TRUE ) | | | `--leaf "Tennessee" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 25.1] | | |--leaf "Georgia" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 14.5] | | |--leaf "Colorado" ( tested = TRUE ) | | `--leaf "Texas" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 8 members at h = 36.8] | |--leaf "Rhode Island" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 7 members at h = 29.3] | |--[dendrogram w/ 2 branches and 4 members at h = 15.6] | | |--leaf "Wyoming" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 3 members at h = 12.4] | | |--leaf "Oregon" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 7.36] | | |--leaf "Oklahoma" ( tested = TRUE ) | | `--leaf "Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 22.8] | |--leaf "Washington" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 11.5] | |--leaf "Massachusetts" ( tested = TRUE ) | `--leaf "New Jersey" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 20 members at h = 87.3] |--[dendrogram w/ 2 branches and 10 members at h = 31.5] | |--[dendrogram w/ 2 branches and 4 members at h = 18.3] | | |--[dendrogram w/ 2 branches and 2 members at h = 6.64] | | | |--leaf "Ohio" ( tested = TRUE ) | | | `--leaf "Utah" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 8.03] | | |--leaf "Connecticut" ( tested = TRUE ) | | `--leaf "Pennsylvania" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 6 members at h = 19.9] | |--[dendrogram w/ 2 branches and 3 members at h = 13.3] | | |--leaf "Nebraska" ( tested = TRUE ) | | `--[dendrogram w/ 2 branches and 2 members at h = 3.83] | | |--leaf "Kentucky" ( tested = TRUE ) | | `--leaf "Montana" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 15.4] | |--leaf "Idaho" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 3.93] | |--leaf "Indiana" ( tested = TRUE ) | `--leaf "Kansas" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 10 members at h = 57.3] |--[dendrogram w/ 2 branches and 5 members at h = 31.6] | |--leaf "Hawaii" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 4 members at h = 19.4] | |--leaf "Minnesota" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 3 members at h = 10.9] | |--leaf "Wisconsin" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 2.29] | |--leaf "Iowa" ( tested = TRUE ) | `--leaf "New Hampshire" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 5 members at h = 41.5] |--[dendrogram w/ 2 branches and 3 members at h = 12.8] | |--leaf "West Virginia" ( tested = TRUE ) | `--[dendrogram w/ 2 branches and 2 members at h = 8.54] | |--leaf "Maine" ( tested = TRUE ) | `--leaf "South Dakota" ( tested = TRUE ) `--[dendrogram w/ 2 branches and 2 members at h = 13] |--leaf "North Dakota" ( tested = TRUE ) `--leaf "Vermont" ( tested = TRUE ) [10:26:42.708] progressify() ... [10:26:42.708] | transpile() ... [10:26:42.709] | : get_transpiler() ... [10:26:42.709] | : . Finding call to be transpiled ... [10:26:42.710] | : . | descend_wrappers() ... [10:26:42.710] | : . | : Call: [10:26:42.711] | : . | : stats::dendrapply [10:26:42.711] | : . | : parse_call() ... [10:26:42.712] | : . | : . Function: stats::dendrapply(...) [10:26:42.712] | : . | : parse_call() ... done [10:26:42.713] | : . | descend_wrappers() ... done [10:26:42.713] | : . | parse_call() ... [10:26:42.714] | : . | : Function: stats::dendrapply(...) [10:26:42.714] | : . | parse_call() ... done [10:26:42.715] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.715] | : . | stats::dendrapply [10:26:42.716] | : . Finding call to be transpiled ... done [10:26:42.716] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.717] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.717] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.718] | : . | Transpiler function: [10:26:42.718] | : . | function (expr, options) [10:26:42.718] | : . | { [10:26:42.718] | : . | ns <- getNamespace("stats") [10:26:42.718] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.718] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.718] | : . | envir = parent.frame()) [10:26:42.718] | : . | } [10:26:42.718] | : . | [10:26:42.719] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.719] | : get_transpiler() ... done [10:26:42.720] | : Transpile call expression ... [10:26:42.720] | : . local(stats::dendrapply(X = { [10:26:42.720] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.720] | : . attr(d, "members") - 1L) [10:26:42.720] | : . d [10:26:42.720] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:26:42.720] | : . on.exit(.progressr_progressor()) [10:26:42.720] | : . ...FUN(...) [10:26:42.720] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.721] | : Transpile call expression ... done [10:26:42.722] | : Evaluate transpiled call expression [10:26:42.724] | transpile() ... done [10:26:42.725] progressify() ... done character(0) [10:26:42.725] progressify() ... [10:26:42.726] | transpile() ... [10:26:42.726] | : get_transpiler() ... [10:26:42.727] | : . Finding call to be transpiled ... [10:26:42.727] | : . | descend_wrappers() ... [10:26:42.728] | : . | : Call: [10:26:42.728] | : . | : stats::dendrapply [10:26:42.729] | : . | : parse_call() ... [10:26:42.730] | : . | : . Function: stats::dendrapply(...) [10:26:42.731] | : . | : parse_call() ... done [10:26:42.731] | : . | descend_wrappers() ... done [10:26:42.732] | : . | parse_call() ... [10:26:42.732] | : . | : Function: stats::dendrapply(...) [10:26:42.733] | : . | parse_call() ... done [10:26:42.733] | : . | Position of call to be transpiled in expression: c(1) [10:26:42.734] | : . | stats::dendrapply [10:26:42.734] | : . Finding call to be transpiled ... done [10:26:42.735] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... [10:26:42.735] | : . | Namespaces registered with progressify(): 'base', 'crossmap', 'future.apply', 'purrr', 'furrr', 'partykit', 'plyr', 'stats', 'foreach', 'doFuture' [10:26:42.736] | : . | Transpiler description: stats::dendrapply() transpiler [10:26:42.736] | : . | Transpiler function: [10:26:42.737] | : . | function (expr, options) [10:26:42.737] | : . | { [10:26:42.737] | : . | ns <- getNamespace("stats") [10:26:42.737] | : . | fcn <- get("dendrapply", mode = "function", envir = ns) [10:26:42.737] | : . | progressify_stats(expr, fcn_name = "dendrapply", fcn = fcn, [10:26:42.737] | : . | envir = parent.frame()) [10:26:42.737] | : . | } [10:26:42.737] | : . | [10:26:42.737] | : . Locating 'progressify::built-in' transpiler for stats::dendrapply() of class 'function' ... done [10:26:42.738] | : get_transpiler() ... done [10:26:42.738] | : Transpile call expression ... [10:26:42.739] | : . local(stats::dendrapply(X = { [10:26:42.739] | : . .progressr_progressor <- progressr::progressor(steps = 2L * [10:26:42.739] | : . attr(d, "members") - 1L) [10:26:42.739] | : . d [10:26:42.739] | : . }, FUN = function(..., ...FUN, .progressr_progressor) { [10:26:42.739] | : . on.exit(.progressr_progressor()) [10:26:42.739] | : . ...FUN(...) [10:26:42.739] | : . }, ...FUN = FUN, .progressr_progressor = .progressr_progressor)) [10:26:42.740] | : Transpile call expression ... done [10:26:42.740] | : Evaluate transpiled call expression [10:26:42.743] | transpile() ... done [10:26:42.743] progressify() ... done Test time: user.self=0.3s, sys.self=0.01s, elapsed=0.3s, user.child=NAs, sys.child=NAs Test 'progressify-stats' ... success > > proc.time() user system elapsed 0.51 0.07 0.57