Running ‘testthat.R’ [33s/44s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(rmapzen)
  > 
  > test_check("rmapzen")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • skipping multiple contiguous tiles test, requires access to external resource (1)
  • skipping single-tile test, requires access to external resource (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-as-sf.R:23:5): as_sf converts vector tile layers to sf ──────────
  Error: Evaluation error: Found 1 feature with invalid spherical geometry.
  [1] Loop 0 is not valid: Edge 17 is degenerate (duplicate vertex).
  Backtrace:
       █
    1. ├─rmapzen::as_sf(ca_tiles$water) test-as-sf.R:23:4
    2. └─rmapzen:::as_sf.mapzen_vector_layer(ca_tiles$water)
    3.   ├─dplyr::summarise(res)
    4.   └─sf:::summarise.sf(res)
    5.     └─base::lapply(...)
    6.       └─sf:::FUN(X[[i]], ...)
    7.         ├─sf::st_union(geom[i == x], is_coverage = is_coverage)
    8.         └─sf:::st_union.sfc(geom[i == x], is_coverage = is_coverage)
    9.           ├─sf::st_as_sfc(s2::s2_union_agg(x, ...), crs = st_crs(x))
   10.           └─s2::s2_union_agg(x, ...)
   11.             ├─s2:::new_s2_xptr(...)
   12.             ├─s2:::cpp_s2_union_agg(...)
   13.             └─s2::s2_union(x, options = options)
   14.               ├─s2::as_s2_geography(x)
   15.               └─sf:::as_s2_geography.sfc(x)
   16.                 └─sf:::st_as_s2.sfc(x, ..., oriented = oriented)
   17.                   ├─s2::as_s2_geography(st_as_binary(x), ..., oriented = oriented)
   18.                   └─s2:::as_s2_geography.WKB(st_as_binary(x), ..., oriented = oriented)
   19.                     ├─s2:::new_s2_xptr(...)
   20.                     └─s2:::s2_geography_from_wkb(x, oriented = oriented, check = check)
  
  [ FAIL 1 | WARN 1 | SKIP 2 | PASS 204 ]
  Error: Test failures
  Execution halted