Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/tests.html
  > # * https://testthat.r-lib.org/reference/test_package.html#special-files
  > 
  > library(testthat)
  > library(wingen)
  > 
  > test_check("wingen")
  Loading required package: sp
  Loading required namespace: vcfR
  Loading required namespace: adegenet
  
  Attaching package: 'purrr'
  
  The following object is masked from 'package:testthat':
  
      is_null
  
  terra 1.7.83
  
  Attaching package: 'terra'
  
  The following objects are masked from 'package:testthat':
  
      compare, describe
  
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  CRS:           NA
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  CRS:           NA
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  Projected CRS: PROJCRS["unknown",
      BASEGEOGCRS["unknown",
          DATUM["Unknown based on WGS 84 ellipsoid",
              ELLIPSOID["WGS 84",6378137,298.257223563,
                  LENGTHUNIT["metre",1],
                  ID["EPSG",7030]]],
          PRIMEM["Greenwich",0,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8901]]],
      CONVERSION["unknown",
          METHOD["Lambert Conic Conformal (2SP)",
              ID["EPSG",9802]],
          PARAMETER["Latitude of false origin",0,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8821]],
          PARAMETER["Longitude of false origin",-100,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8822]],
          PARAMETER["Latitude of 1st standard parallel",48,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8823]],
          PARAMETER["Latitude of 2nd standard parallel",33,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8824]],
          PARAMETER["Easting at false origin",0,
              LENGTHUNIT["metre",1],
              ID["EPSG",8826]],
          PARAMETER["Northing at false origin",0,
              LENGTHUNIT["metre",1],
              ID["EPSG",8827]]],
      CS[Cartesian,2],
          AXIS["(E)",east,
              ORDER[1],
              LENGTHUNIT["metre",1,
                  ID["EPSG",9001]]],
          AXIS["(N)",north,
              ORDER[2],
              LENGTHUNIT["metre",1,
                  ID["EPSG",9001]]]]
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  Projected CRS: PROJCRS["unknown",
      BASEGEOGCRS["unknown",
          DATUM["Unknown based on WGS 84 ellipsoid",
              ELLIPSOID["WGS 84",6378137,298.257223563,
                  LENGTHUNIT["metre",1],
                  ID["EPSG",7030]]],
          PRIMEM["Greenwich",0,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8901]]],
      CONVERSION["unknown",
          METHOD["Lambert Conic Conformal (2SP)",
              ID["EPSG",9802]],
          PARAMETER["Latitude of false origin",0,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8821]],
          PARAMETER["Longitude of false origin",-100,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8822]],
          PARAMETER["Latitude of 1st standard parallel",48,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8823]],
          PARAMETER["Latitude of 2nd standard parallel",33,
              ANGLEUNIT["degree",0.0174532925199433],
              ID["EPSG",8824]],
          PARAMETER["Easting at false origin",0,
              LENGTHUNIT["metre",1],
              ID["EPSG",8826]],
          PARAMETER["Northing at false origin",0,
              LENGTHUNIT["metre",1],
              ID["EPSG",8827]]],
      CS[Cartesian,2],
          AXIS["(E)",east,
              ORDER[1],
              LENGTHUNIT["metre",1,
                  ID["EPSG",9001]]],
          AXIS["(N)",north,
              ORDER[2],
              LENGTHUNIT["metre",1,
                  ID["EPSG",9001]]]]
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  Linking to GEOS 3.13.0, GDAL 3.9.3, PROJ 9.5.0; sf_use_s2() is TRUE
  Scanning file to determine attributes.
  File attributes:
    meta lines: 3
    header_line: 4
    variant count: 10
    column count: 19
  
  Meta line 3 read in.
  All meta lines processed.
  gt matrix initialized.
  Character matrix gt created.
    Character matrix gt rows: 10
    Character matrix gt cols: 19
    skip: 0
    nrows: 10
    row_num: 0
  
  Processed variant: 10
  All variants processed
  Scanning file to determine attributes.
  File attributes:
    meta lines: 3
    header_line: 4
    variant count: 10
    column count: 19
  
  Meta line 3 read in.
  All meta lines processed.
  gt matrix initialized.
  Character matrix gt created.
    Character matrix gt rows: 10
    Character matrix gt cols: 19
    skip: 0
    nrows: 10
    row_num: 0
  
  Processed variant: 10
  All variants processed
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  CRS:           NA
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  Simple feature collection with 1 feature and 3 fields
  Geometry type: POINT
  Dimension:     XY
  Bounding box:  xmin: 85 ymin: -65 xmax: 85 ymax: -65
  CRS:           NA
        layer       geometry  x   y
  4 0.3231611 POINT (85 -65) 85 -65
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  [using ordinary kriging]
  Loading required package: igraph
  
  Attaching package: 'igraph'
  
  The following objects are masked from 'package:terra':
  
      blocks, compare, union
  
  The following objects are masked from 'package:purrr':
  
      compose, simplify
  
  The following object is masked from 'package:raster':
  
      union
  
  The following object is masked from 'package:testthat':
  
      compare
  
  The following objects are masked from 'package:stats':
  
      decompose, spectrum
  
  The following object is masked from 'package:base':
  
      union
  
  Loading required package: Matrix
  
  Attaching package: 'gdistance'
  
  The following object is masked from 'package:igraph':
  
      normalize
  
  
  -------------------- mini middle earth example --------------------
  
  Objects loaded:
  mini_vcf: vcfR object (10 variants x 10 samples) and no missing data
  mini_vcf_NA: vcfR object (10 variants x 10 samples) and missing data
  mini_coords: dataframe with x and y coordinates
  mini_lyr: middle earth RasterLayer (10 x 10)
  
  -------------------------------------------------------------------
  
  -------------------- mini middle earth example --------------------
  
  Objects loaded:
  mini_vcf: vcfR object (10 variants x 10 samples) and no missing data
  mini_vcf_NA: vcfR object (10 variants x 10 samples) and missing data
  mini_coords: dataframe with x and y coordinates
  mini_lyr: middle earth RasterLayer (10 x 10)
  
  -------------------------------------------------------------------
  
  -------------------- mini middle earth example --------------------
  
  Objects loaded:
  mini_vcf: vcfR object (10 variants x 10 samples) and no missing data
  mini_vcf_NA: vcfR object (10 variants x 10 samples) and missing data
  mini_coords: dataframe with x and y coordinates
  mini_lyr: middle earth RasterLayer (10 x 10)
  
  -------------------------------------------------------------------
  
  -------------------- mini middle earth example --------------------
  
  Objects loaded:
  mini_vcf: vcfR object (10 variants x 10 samples) and no missing data
  mini_vcf_NA: vcfR object (10 variants x 10 samples) and missing data
  mini_coords: dataframe with x and y coordinates
  mini_lyr: middle earth RasterLayer (10 x 10)
  
  -------------------------------------------------------------------
  Scanning file to determine attributes.
  File attributes:
    meta lines: 3
    header_line: 4
    variant count: 10
    column count: 19
  
  Meta line 3 read in.
  All meta lines processed.
  gt matrix initialized.
  Character matrix gt created.
    Character matrix gt rows: 10
    Character matrix gt cols: 19
    skip: 0
    nrows: 10
    row_num: 0
  
  Processed variant: 10
  All variants processed
  [ FAIL 13 | WARN 0 | SKIP 0 | PASS 211 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_window_gd.R:22:3'): all stats and parallel works ───────────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:22:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(mini_vcf_NA, mini_coords, mini_lyr, stat, rarify = FALSE)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─furrr:::poll_progress(futures, file, n)
   17. │                     └─furrr:::any_running(futures)
   18. │                       ├─future::resolved(futures)
   19. │                       └─future:::resolved.list(futures)
   20. │                         ├─future::resolved(f, ...)
   21. │                         └─future:::resolved.ClusterFuture(f, ...)
   22. │                           └─future:::receiveMessageFromWorker(x)
   23. │                             └─base::stop(ex)
   24. └─purrr (local) `<fn>`(`<FutrErrr>`)
   25.   └─cli::cli_abort(...)
   26.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:32:3'): rarifaction works for all options ──────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:32:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:45:3'): check that setting the seed produces the same results ──
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:45:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(mini_vcf, mini_coords, mini_lyr, rarify = TRUE)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:64:3'): all stats work with just one site ──────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:64:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:84:3'): window_gd returns expected value ───────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:84:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:114:3'): L argument works ──────────────────────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:114:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:161:3'): allelic richness is calculated correctly for dataset with NAs (and rarefaction) ──
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:161:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:215:3'): allelic richness is calculated correctly for dataset with no NAs ──
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:215:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:275:3'): vcf path works ────────────────────────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:275:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(vcfpath, mini_coords, mini_lyr, rarify = FALSE)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:339:3'): custom functions with window general work ──
  <FutureError/error/FutureCondition/condition>
  Error: Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:339:3
    2. │ └─base::withCallingHandlers(...)
    3. └─wingen::window_general(...)
    4.   └─wingen:::run_general(...)
    5.     └─furrr::future_map(...)
    6.       └─furrr:::furrr_map_template(...)
    7.         └─furrr:::furrr_template(...)
    8.           └─future::future(...)
    9.             ├─future::run(future)
   10.             └─future:::run.Future(future)
   11.               ├─future::run(future)
   12.               └─future:::run.ClusterFuture(future)
   13.                 └─future:::requestNode(...)
   14.                   └─future (local) await()
   15.                     └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   16.                       └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   17.                         ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   18.                         └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   19.                           └─future:::receiveMessageFromWorker(x)
  ── Error ('test_window_gd.R:401:3'): window_gd works for different spatial types ──
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:401:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(mini_vcf, sf_coords, mini_lyr, rarify = FALSE)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:437:3'): CRS are handled correctly ─────────────────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! Package 'future' is not installed on worker (r_version: R Under development (unstable) (2024-11-13 r87330); platform: x86_64-pc-linux-gnu (64-bit); os: Linux 6.10.11-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.10.11-1 (2024-09-22); hostname: gimli2)
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:437:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(mini_vcf, nocrs_coords, nocrs_lyr, rarify = FALSE)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  ── Error ('test_window_gd.R:460:3'): edge cropping is performed correctly ──────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(stat, function(stat) window_gd_stats(gen = gen, coords = coords, 
      lyr = lyr, stat = stat, wdim = wdim, fact = fact, rarify = rarify, 
      rarify_n = rarify_n, rarify_nit = rarify_nit, min_n = min_n, 
      fun = fun, L = L, rarify_alleles = rarify_alleles, sig = sig, 
      crop_edges = crop_edges))`: i In index: 1.
  Caused by error:
  ! there is no package called ‘purrr’
  Backtrace:
       ▆
    1. ├─testthat::capture_warnings(...) at test_window_gd.R:460:3
    2. │ └─base::withCallingHandlers(...)
    3. ├─wingen::window_gd(...)
    4. │ └─purrr::map(...)
    5. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    6. │     ├─purrr:::with_indexed_errors(...)
    7. │     │ └─base::withCallingHandlers(...)
    8. │     ├─purrr:::call_with_cleanup(...)
    9. │     └─wingen (local) .f(.x[[i]], ...)
   10. │       └─wingen:::window_gd_stats(...)
   11. │         └─wingen::window_general(...)
   12. │           └─wingen:::run_general(...)
   13. │             └─furrr::future_map(...)
   14. │               └─furrr:::furrr_map_template(...)
   15. │                 └─furrr:::furrr_template(...)
   16. │                   └─future::future(...)
   17. │                     ├─future::run(future)
   18. │                     └─future:::run.Future(future)
   19. │                       ├─future::run(future)
   20. │                       └─future:::run.ClusterFuture(future)
   21. │                         └─future:::requestNode(...)
   22. │                           └─future (local) await()
   23. │                             └─future:::FutureRegistry(reg, action = "collect-first", earlySignal = TRUE)
   24. │                               └─future (local) collectValues(where, futures = futures, firstOnly = TRUE)
   25. │                                 ├─future::resolved(future, run = FALSE, .signalEarly = FALSE)
   26. │                                 └─future:::resolved.ClusterFuture(future, run = FALSE, .signalEarly = FALSE)
   27. │                                   └─future:::receiveMessageFromWorker(x)
   28. │                                     └─base::stop(ex)
   29. └─purrr (local) `<fn>`(`<FutrErrr>`)
   30.   └─cli::cli_abort(...)
   31.     └─rlang::abort(...)
  
  [ FAIL 13 | WARN 0 | SKIP 0 | PASS 211 ]
  Error: Test failures
  Execution halted