Running ‘sc-conversion-fns.R’
  Running ‘testthat.R’ [82s/75s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(dodgr)
  > 
  > test_check("dodgr")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • !test_all is TRUE (1)
  • On CRAN (7)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-dists.R:256:3): dists with no edge ids ──────────────────────────
  Error in `dimnames(x) <- dn`: length of 'dimnames' [1] not equal to array extent
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-dists.R:256:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. └─dodgr::dodgr_distances(graph, from = from, to = to)
   10.   └─dodgr::dodgr_dists(...)
   11.     └─dodgr:::calculate_distmat(...)
   12.       └─base::`rownames<-`(`*tmp*`, value = from_index$id)
  ── Error (test-dists.R:336:3): graph columns ───────────────────────────────────
  Error in `dimnames(x) <- dn`: length of 'dimnames' [1] not equal to array extent
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-dists.R:336:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. └─dodgr::dodgr_distances(graph, from = from, to = to)
   10.   └─dodgr::dodgr_dists(...)
   11.     └─dodgr:::calculate_distmat(...)
   12.       └─base::`rownames<-`(`*tmp*`, value = from_index$id)
  ── Error (test-iso.R:16:15): isodists ──────────────────────────────────────────
  Error in `cbind(as.numeric(obj[, xy_cols[1], drop = TRUE]), as.numeric(obj[, 
      xy_cols[2], drop = TRUE]))`: 'list' object cannot be coerced to type 'double'
  Backtrace:
       █
    1. ├─testthat::expect_silent(net <- weight_streetnet(hsc, wt_profile = "bicycle")) test-iso.R:16:14
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dodgr::weight_streetnet(hsc, wt_profile = "bicycle")
   10. ├─dodgr:::weight_streetnet.SC(hsc, wt_profile = "bicycle")
   11. │ └─`%>%`(...)
   12. ├─dodgr:::sc_duplicate_edges(., wt_profile)
   13. │ ├─base::seq(nrow(x))
   14. │ └─base::nrow(x)
   15. ├─dodgr:::rm_duplicated_edges(.)
   16. │ └─dodgr:::dodgr_graph_cols(graph)
   17. ├─dodgr:::sc_traffic_lights(., x, wt_profile, wt_profile_file)
   18. │ ├─base::which(graph$edge_ %in% oles$edge_ & graph$.vx1 %in% nodes)
   19. │ └─graph$edge_ %in% oles$edge_
   20. ├─dodgr:::calc_edge_time(., wt_profile)
   21. │ └─dodgr:::dodgr_graph_cols(graph)
   22. ├─dodgr:::weight_by_num_lanes(., wt_profile)
   23. │ └─"lanes" %in% names(graph)
   24. ├─dodgr:::set_maxspeed(., wt_profile, wt_profile_file)
   25. │ └─"maxspeed" %in% names(graph)
   26. ├─dodgr:::weight_sc_edges(., wt_profile, wt_profile_file)
   27. │ ├─`%>%`(...)
   28. │ └─dplyr::left_join(graph, wp, by = c(highway = "way"))
   29. ├─dplyr::select(., -value)
   30. ├─dplyr::mutate(., d_weighted = ifelse(value == 0, NA, d/value))
   31. ├─dplyr::filter(., !is.na(value))
   32. ├─dodgr:::extract_sc_edges_highways(...)
   33. │ ├─`%>%`(...)
   34. │ └─dplyr::left_join(graph, x$object_link_edge, by = "edge_")
   35. ├─dplyr::select(., -native_)
   36. └─dodgr:::sc_edge_dist(.)
   37.   └─geodist::geodist(xy0, xy1, paired = TRUE)
   38.     └─geodist:::convert_to_matrix(x)
   39.       └─base::cbind(...)
  
  [ FAIL 3 | WARN 0 | SKIP 8 | PASS 186 ]
  Error: Test failures
  Execution halted