Running examples in ‘ofpetrial-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: check_ortho_with_chars
> ### Title: Check the orthogonality with field/topographic characteristics
> ### Aliases: check_ortho_with_chars
> 
> ### ** Examples
> 
> data(td_single_input)
> yield_sf <- sf::st_read(system.file("extdata", "yield-simple1.shp", package = "ofpetrial"))
Reading layer `yield-simple1' from data source 
  `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/ofpetrial/extdata/yield-simple1.shp' 
  using driver `ESRI Shapefile'
Simple feature collection with 3365 features and 1 field
Geometry type: POINT
Dimension:     XY
Bounding box:  xmin: -16.70072 ymin: 39.11962 xmax: -16.69613 ymax: 39.1269
Geodetic CRS:  WGS 84
> ssurgo_sf <-
+   sf::st_read(system.file("extdata", "ssurgo-simple1.shp", package = "ofpetrial")) %>%
+   dplyr::mutate(mukey = factor(mukey))
Reading layer `ssurgo-simple1' from data source 
  `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/ofpetrial/extdata/ssurgo-simple1.shp' 
  using driver `ESRI Shapefile'
Simple feature collection with 11 features and 9 fields
Geometry type: POLYGON
Dimension:     XY
Bounding box:  xmin: -16.70096 ymin: 39.11957 xmax: -16.69587 ymax: 39.12696
Geodetic CRS:  WGS 84
> topo_rast <-
+   c(
+     terra::rast(system.file("extdata", "slope.tif", package = "ofpetrial")),
+     terra::rast(system.file("extdata", "twi.tif", package = "ofpetrial"))
+   )
> 
> checks <-
+   check_ortho_with_chars(
+     td = td_single_input,
+     sp_data_list = list(yield_sf, ssurgo_sf, topo_rast),
+     vars_list = list("Yld_Vol_Dr", c("mukey", "clay"), names(topo_rast))
+   )
Error in `dplyr::mutate()`:
ℹ In argument: `checks = purrr::pmap(list(trial_design, spatial_data,
  variable), summarize_chars)`.
Caused by error in `purrr::pmap()`:
ℹ In index: 2.
Caused by error in `purrr::map()`:
ℹ In index: 2.
Caused by error in `ggplot2::scale_x_continuous()`:
! `limits` must be a <numeric> vector, not a character vector.
Backtrace:
     ▆
  1. ├─ofpetrial::check_ortho_with_chars(...)
  2. │ └─... %>% ...
  3. ├─dplyr::select(., var, input_name, summary_data, summary_fig)
  4. ├─tidyr::unnest(., checks)
  5. ├─dplyr::mutate(...)
  6. ├─dplyr:::mutate.data.frame(...)
  7. │ └─dplyr:::mutate_cols(.data, dplyr_quosures(...), by)
  8. │   ├─base::withCallingHandlers(...)
  9. │   └─dplyr:::mutate_col(dots[[i]], data, mask, new_columns)
 10. │     └─mask$eval_all_mutate(quo)
 11. │       └─dplyr (local) eval()
 12. ├─purrr::pmap(list(trial_design, spatial_data, variable), summarize_chars)
 13. │ └─purrr:::pmap_("list", .l, .f, ..., .progress = .progress)
 14. │   ├─purrr:::with_indexed_errors(...)
 15. │   │ └─base::withCallingHandlers(...)
 16. │   ├─purrr:::call_with_cleanup(...)
 17. │   └─ofpetrial (local) .f(.l[[1L]][[i]], .l[[2L]][[i]], .l[[3L]][[i]], ...)
 18. │     ├─... %>% dplyr::bind_rows()
 19. │     └─purrr::map(char_vars, function(x) summarize_indiv_char(joined_data, var = x))
 20. │       └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
 21. │         ├─purrr:::with_indexed_errors(...)
 22. │         │ └─base::withCallingHandlers(...)
 23. │         ├─purrr:::call_with_cleanup(...)
 24. │         └─ofpetrial (local) .f(.x[[i]], ...)
 25. │           └─ofpetrial:::summarize_indiv_char(joined_data, var = x)
 26. │             └─... %>% ggExtra::ggMarginal(type = "histogram")
 27. ├─dplyr::bind_rows(.)
 28. │ └─rlang::list2(...)
 29. └─ggExtra::ggMarginal(., type = "histogram")
 30.   └─plt$build()
 31.     └─private$addLimits(margThemed)
 32.       └─ggplot2::scale_x_continuous(limits = limits, oob = scales::squish)
 33.         └─ggplot2::continuous_scale(...)
 34.           └─ggplot2:::check_continuous_limits(limits, call = call)
 35.             └─ggplot2:::check_numeric(limits, arg = arg, call = call, allow_na = TRUE)
 36.               └─ggplot2:::check_object(x, is.numeric, what, ..., arg = arg, call = call)
 37.                 └─ggplot2:::stop_input_type(...)
 38.                   └─rlang::abort(message, ..., call = call, arg = arg)
Execution halted
Examples with CPU (user + system) or elapsed time > 5s
                          user system elapsed
check_ortho_inputs       7.276  0.259   8.740
assign_rates_conditional 3.976  0.105   5.126