Running ‘testthat.R’ [129s/108s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidyterra)
  
  Attaching package: 'tidyterra'
  
  The following object is masked from 'package:stats':
  
      filter
  
  > 
  > test_check("tidyterra")
  Starting 2 test processes
  [ FAIL 14 | WARN 4 | SKIP 37 | PASS 1547 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (37)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-as_spatraster.R:31:3'): Regenerate raster properly ─────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─tibble::as_tibble(r, xy = TRUE, na.rm = FALSE) at test-as_spatraster.R:31:2
   2. └─tidyterra:::as_tibble.SpatRaster(r, xy = TRUE, na.rm = FALSE)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-as_tibble-Spat.R:91:3'): For SpatRaster ────────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─dplyr::as_tibble(r) at test-as_tibble-Spat.R:91:2
   2. └─tidyterra:::as_tibble.SpatRaster(r)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-as_tibble-Spat.R:127:3'): For SpatRaster Internal ──────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(as_tibble(r), as_tibble(regen)) at test-as_tibble-Spat.R:127:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tibble::as_tibble(r)
    5. └─tidyterra:::as_tibble.SpatRaster(r)
    6.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
    7.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
    8.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
    9.       ├─base::withCallingHandlers(...)
   10.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-drop_na-Spat.R:86:3'): Drop na with SpatRaster ─────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─tibble::as_tibble(r, na.rm = FALSE) at test-drop_na-Spat.R:86:2
   2. └─tidyterra:::as_tibble.SpatRaster(r, na.rm = FALSE)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-filter-Spat.R:12:3'): Filter with SpatRaster keeping extent ────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─tibble::as_tibble(r_keep, xy = TRUE, na.rm = FALSE) at test-filter-Spat.R:12:2
   2. └─tidyterra:::as_tibble.SpatRaster(r_keep, xy = TRUE, na.rm = FALSE)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-glimpse-Spat.R:23:3'): Glimpse SpatRasters ─────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─pillar::glimpse(r) at test-glimpse-Spat.R:23:2
    2. └─tidyterra:::glimpse.SpatRaster(r)
    3.   ├─dplyr::glimpse(as_tibble(x, ...), width = width)
    4.   ├─tibble::as_tibble(x, ...)
    5.   └─tidyterra:::as_tibble.SpatRaster(x, ...)
    6.     ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
    7.     └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
    8.       └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
    9.         ├─base::withCallingHandlers(...)
   10.         └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-geom_spatraster_rgb.R:176:3'): geom_spatraster_rgb with CRS masked ──
  Error in `calc_limits_bbox(self$lims_method, scale_xlim, scale_ylim, params$crs, 
      params$default_crs)`: Scale limits cannot be mapped onto spatial coordinates in `coord_sf()`
  i Consider setting `lims_method = "geometry_bbox"` or `default_crs = NULL`.
  Backtrace:
       ▆
    1. ├─ggplot2::ggplot_build(s) at test-geom_spatraster_rgb.R:176:2
    2. └─ggplot2:::ggplot_build.ggplot(s)
    3.   └─layout$setup_panel_params()
    4.     └─ggplot2 (local) setup_panel_params(..., self = self)
    5.       └─base::Map(setup_panel_params, scales_x, scales_y)
    6.         └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
    7.           └─ggplot2 (local) `<fn>`(dots[[1L]][[1L]], dots[[2L]][[1L]])
    8.             └─self$coord$setup_panel_params(scale_x, scale_y, params = self$coord_params)
    9.               └─ggplot2 (local) setup_panel_params(..., self = self)
   10.                 └─ggplot2:::calc_limits_bbox(self$lims_method, scale_xlim, scale_ylim, params$crs, params$default_crs)
   11.                   └─cli::cli_abort(...)
   12.                     └─rlang::abort(...)
  ── Failure ('test-geom_spatraster_rgb.R:466:3'): geom_spatraster_rgb with no CRS masked ──
  `ggplot_build(s)` produced warnings.
  ── Error ('test-geom_spatraster_rgb.R:475:3'): geom_spatraster_rgb with no CRS masked ──
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─tidyterra:::make_hexcol(r) at test-geom_spatraster_rgb.R:475:2
   2.   ├─tibble::as_tibble(data, xy = TRUE, na.rm = FALSE)
   3.   └─tidyterra:::as_tibble.SpatRaster(data, xy = TRUE, na.rm = FALSE)
   4.     ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   6.       └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   7.         ├─base::withCallingHandlers(...)
   8.         └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-join-Spat.R:17:3'): mutating joins preserve row and column order of x ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─dplyr::right_join(df1, df2, by = "a") at test-join-Spat.R:17:2
    2. └─tidyterra:::right_join.SpatVector(df1, df2, by = "a")
    3.   ├─dplyr::right_join(...)
    4.   └─dplyr:::right_join.data.frame(...)
    5.     └─dplyr:::join_mutate(...)
    6.       ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    7.       └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    8.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    9.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   10.             ├─base::withCallingHandlers(...)
   11.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-pull-Spat.R:4:3'): With SpatRaster ─────────────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─tibble::as_tibble(r) at test-pull-Spat.R:4:2
   2. └─tidyterra:::as_tibble.SpatRaster(r)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-replace_na-Spat.R:72:3'): Replace na with SpatRaster ───────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─tibble::as_tibble(r, na.rm = FALSE) at test-replace_na-Spat.R:72:2
   2. └─tidyterra:::as_tibble.SpatRaster(r, na.rm = FALSE)
   3.   ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
   4.   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
   5.     └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
   6.       ├─base::withCallingHandlers(...)
   7.       └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-slice-SpatRaster.R:282:3'): Slice min ──────────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─tibble::as_tibble(slice_min(r3, order_by = log2, prop = 0.5)) at test-slice-SpatRaster.R:282:2
    2. ├─dplyr::slice_min(r3, order_by = log2, prop = 0.5)
    3. └─tidyterra:::slice_min.SpatRaster(r3, order_by = log2, prop = 0.5)
    4.   ├─tibble::as_tibble(.data, na.rm = FALSE, xy = FALSE)
    5.   └─tidyterra:::as_tibble.SpatRaster(.data, na.rm = FALSE, xy = FALSE)
    6.     ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
    7.     └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
    8.       └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
    9.         ├─base::withCallingHandlers(...)
   10.         └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  ── Error ('test-slice-SpatRaster.R:374:3'): Slice max ──────────────────────────
  Error in `vectbl_assign(x[[j]], cells[[j]], value)`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─tibble::as_tibble(slice_max(r3, order_by = log2, prop = 0.5)) at test-slice-SpatRaster.R:374:2
    2. ├─dplyr::slice_max(r3, order_by = log2, prop = 0.5)
    3. └─tidyterra:::slice_max.SpatRaster(r3, order_by = log2, prop = 0.5)
    4.   ├─tibble::as_tibble(.data, na.rm = FALSE, xy = FALSE)
    5.   └─tidyterra:::as_tibble.SpatRaster(.data, na.rm = FALSE, xy = FALSE)
    6.     ├─base::`[<-`(`*tmp*`, is.na(df), value = `<lgl>`)
    7.     └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(df), value = `<lgl>`)
    8.       └─tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
    9.         ├─base::withCallingHandlers(...)
   10.         └─tibble:::vectbl_assign(x[[j]], cells[[j]], value)
  
  [ FAIL 14 | WARN 4 | SKIP 37 | PASS 1547 ]
  Error: Test failures
  Execution halted