Running 'testthat.R' [18s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(happign)
  Please make sure you have an internet connection.
  Use happign::get_last_news() to display latest geoservice news.
  > 
  > test_check("happign")
  Linking to GEOS 3.11.1, GDAL 3.6.2, PROJ 9.1.1; sf_use_s2() is TRUE
  terra 1.7.23
  
  Attaching package: 'terra'
  
  The following objects are masked from 'package:testthat':
  
      compare, describe
  
  Writing layer `file2b54c390a1274' to data source 
    `D:\temp\RtmpiSdCvX\file2b54c390a1274.shp' using driver `ESRI Shapefile'
  Writing 1 features with 0 fields and geometry type Point.
  Layer file2b54c390a1274 in dataset D:\temp\RtmpiSdCvX\file2b54c390a1274.shp already exists:
  use either append=TRUE to append to layer or append=FALSE to overwrite layer
  Deleting source `D:\temp\RtmpiSdCvX\file2b54c390a1274.shp' using driver `ESRI Shapefile'
  Writing layer `file2b54c390a1274' to data source 
    `D:\temp\RtmpiSdCvX\file2b54c390a1274.shp' using driver `ESRI Shapefile'
  Writing 1 features with 1 fields and geometry type Point.
  Error in readRDS(mapfile) : error reading from connection
  Raster is saved at :
  D:\temp\RtmpiSdCvX\combined2b54c5f88cb0.tif
  Use happign::get_last_news() to display latest geoservice news.
  Please make sure you have an internet connection.
  [ FAIL 1 | WARN 0 | SKIP 18 | PASS 37 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (18)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-get_wms_raster.R:4:4'): nb_pixel_bbox ──────────────────────────
  Error: unable to load R code in package 's2'
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-get_wms_raster.R:4:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─happign:::nb_pixel_bbox(shape, resolution = 10, crs = 4326)
   5. │ └─sf::st_length(st_sfc(list(width, height), crs = st_crs(crs)))
   6. │   └─units::set_units(s2::s2_length(x, ...), "m", mode = "standard")
   7. └─base::loadNamespace(x)
  
  [ FAIL 1 | WARN 0 | SKIP 18 | PASS 37 ]
  Error: Test failures
  Execution halted