Running ‘testthat.R’ [27s/47s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(sfnetworks)
  > 
  > test_check("sfnetworks")
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 277 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_join.R:66:3): st_network_join creates an sfnetwork before joining an sf to a
            network ──
  Error in `mtfrm.default(structure(list(8, TRUE, c(0, 1, 2, 4, 5, 6), c(1, 
  2, 3, 5, 6, 7), c(0, 1, 2, 3, 4, 5), c(0, 1, 2, 3, 4, 5), c(0, 
  1, 2, 3, 3, 4, 5, 6, 6), c(0, 0, 1, 2, 3, 3, 4, 5, 6), list(c(1, 
  0, 1), structure(list(), names = character(0)), structure(list(
      x = structure(list(structure(c(0, 0), class = c("XY", "POINT", 
      "sfg")), structure(c(1, 1), class = c("XY", "POINT", "sfg"
      )), structure(c(0, 2), class = c("XY", "POINT", "sfg")), 
          structure(c(-1, 1), class = c("XY", "POINT", "sfg")), 
          structure(c(0.94350046152249, 0.444465211038628), class = c("XY", 
          "POINT", "sfg")), structure(c(-0.832484982907772, 0.803159616941065
          ), class = c("XY", "POINT", "sfg")), structure(c(0.747739845421165, 
          0.144967749131655), class = c("XY", "POINT", "sfg")), 
          structure(c(-0.341537271160632, 0.00489947200455518), class = c("XY", 
          "POINT", "sfg"))), class = c("sfc_POINT", "sfc"), precision = 0, bbox = structure(c(xmin = -1, 
      ymin = 0, xmax = 1, ymax = 2), class = "bbox"), crs = structure(list(
          input = "EPSG:4326", wkt = "GEOGCRS[\"WGS 84\",\n    ENSEMBLE[\"World Geodetic System 1984 ensemble\",\n        MEMBER[\"World Geodetic System 1984 (Transit)\"],\n        MEMBER[\"World Geodetic System 1984 (G730)\"],\n        MEMBER[\"World Geodetic System 1984 (G873)\"],\n        MEMBER[\"World Geodetic System 1984 (G1150)\"],\n        MEMBER[\"World Geodetic System 1984 (G1674)\"],\n        MEMBER[\"World Geodetic System 1984 (G1762)\"],\n        MEMBER[\"World Geodetic System 1984 (G2139)\"],\n        ELLIPSOID[\"WGS 84\",6378137,298.257223563,\n            LENGTHUNIT[\"metre\",1]],\n        ENSEMBLEACCURACY[2.0]],\n    PRIMEM[\"Greenwich\",0,\n        ANGLEUNIT[\"degree\",0.0174532925199433]],\n    CS[ellipsoidal,2],\n        AXIS[\"geodetic latitude (Lat)\",north,\n            ORDER[1],\n            ANGLEUNIT[\"degree\",0.0174532925199433]],\n        AXIS[\"geodetic longitude (Lon)\",east,\n            ORDER[2],\n            ANGLEUNIT[\"degree\",0.0174532925199433]],\n    USAGE[\n        SCOPE[\"Horizontal component of 3D system.\"],\n        AREA[\"World.\"],\n        BBOX[-90,-180,90,180]],\n    ID[\"EPSG\",4326]]"), class = "crs"), n_empty = 0L)), sf_column = "x", agr = structure(integer(0), class = "factor", levels = c("constant", 
  "aggregate", "identity"), names = character(0))), list(x = structure(list(
      structure(c(0, 1, 0, 1), dim = c(2L, 2L), class = c("XY", 
      "LINESTRING", "sfg")), structure(c(1, 0, 1, 2), dim = c(2L, 
      2L), class = c("XY", "LINESTRING", "sfg")), structure(c(0, 
      -1, 2, 1), dim = c(2L, 2L), class = c("XY", "LINESTRING", 
      "sfg")), structure(c(0.94350046152249, -0.832484982907772, 
      0.444465211038628, 0.803159616941065), dim = c(2L, 2L), class = c("XY", 
      "LINESTRING", "sfg")), structure(c(-0.832484982907772, 0.747739845421165, 
      0.803159616941065, 0.144967749131655), dim = c(2L, 2L), class = c("XY", 
      "LINESTRING", "sfg")), structure(c(0.747739845421165, -0.341537271160632, 
      0.144967749131655, 0.00489947200455518), dim = c(2L, 2L), class = c("XY", 
      "LINESTRING", "sfg"))), class = c("sfc_LINESTRING", "sfc"
  ), precision = 0, bbox = structure(c(xmin = -1, ymin = 0, xmax = 1, 
  ymax = 2), class = "bbox"), crs = structure(list(input = "EPSG:4326", 
      wkt = "GEOGCRS[\"WGS 84\",\n    ENSEMBLE[\"World Geodetic System 1984 ensemble\",\n        MEMBER[\"World Geodetic System 1984 (Transit)\"],\n        MEMBER[\"World Geodetic System 1984 (G730)\"],\n        MEMBER[\"World Geodetic System 1984 (G873)\"],\n        MEMBER[\"World Geodetic System 1984 (G1150)\"],\n        MEMBER[\"World Geodetic System 1984 (G1674)\"],\n        MEMBER[\"World Geodetic System 1984 (G1762)\"],\n        MEMBER[\"World Geodetic System 1984 (G2139)\"],\n        ELLIPSOID[\"WGS 84\",6378137,298.257223563,\n            LENGTHUNIT[\"metre\",1]],\n        ENSEMBLEACCURACY[2.0]],\n    PRIMEM[\"Greenwich\",0,\n        ANGLEUNIT[\"degree\",0.0174532925199433]],\n    CS[ellipsoidal,2],\n        AXIS[\"geodetic latitude (Lat)\",north,\n            ORDER[1],\n            ANGLEUNIT[\"degree\",0.0174532925199433]],\n        AXIS[\"geodetic longitude (Lon)\",east,\n            ORDER[2],\n            ANGLEUNIT[\"degree\",0.0174532925199433]],\n    USAGE[\n        SCOPE[\"Horizontal component of 3D system.\"],\n        AREA[\"World.\"],\n        BBOX[-90,-180,90,180]],\n    ID[\"EPSG\",4326]]"), class = "crs"), n_empty = 0L))), 
      <environment>), class = c("sfnetwork", "tbl_graph", "igraph"
  ), active = "nodes"))`: cannot mtfrm
  Backtrace:
      ▆
   1. └─testthat::expect_setequal(...) at test_join.R:66:2
   2.   └─act$val %in% exp$val
   3.     ├─base::mtfrm(`<sfnetwrk>`)
   4.     └─base::mtfrm.default(`<sfnetwrk>`)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 277 ]
  Error: Test failures
  Execution halted