Last updated on 2025-12-21 23:49:11 CET.
| Package | ERROR | OK |
|---|---|---|
| hydroloom | 4 | 9 |
| ncdfgeom | 13 | |
| nhdplusTools | 3 | 10 |
| sbtools | 13 |
Current CRAN status: ERROR: 4, OK: 9
Version: 1.1.1
Check: examples
Result: ERROR
Running examples in ‘hydroloom-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: disambiguate_indexes
> ### Title: Disambiguate Flowline Indexes
> ### Aliases: disambiguate_indexes
>
> ### ** Examples
>
> if(require(nhdplusTools)) {
+ source(system.file("extdata", "sample_flines.R", package = "nhdplusTools"))
+
+ hydro_location <- sf::st_sf(id = c(1, 2, 3),
+ geom = sf::st_sfc(list(sf::st_point(c(-76.86934, 39.49328)),
+ sf::st_point(c(-76.91711, 39.40884)),
+ sf::st_point(c(-76.88081, 39.36354))),
+ crs = 4326),
+ totda = c(23.6, 7.3, 427.9),
+ nameid = c("Patapsco", "", "Falls Run River"))
+
+ indexes <- index_points_to_lines(sample_flines,
+ hydro_location,
+ search_radius = units::set_units(0.2, "degrees"),
+ max_matches = 10)
+
+ disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, TotDASqKM),
+ dplyr::select(hydro_location, id, totda))
+
+ result <- disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, GNIS_NAME),
+ dplyr::select(hydro_location, id, nameid))
+
+ result[result$point_id == 1, ]
+
+ result[result$point_id == 2, ]
+
+ result[result$point_id == 3, ]
+ }
Loading required package: nhdplusTools
Attaching package: ‘nhdplusTools’
The following object is masked from ‘package:hydroloom’:
make_node_topology
Warning in index_points_to_lines.hy(x, points, search_radius = search_radius, :
converting to LINESTRING, this may be slow, check results
Error in `[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id)) :
attempt access index 4/4 in VECTOR_ELT
Calls: index_points_to_lines ... index_points_to_lines.hy -> left_join -> matcher_dt -> [ -> [.data.table
Execution halted
Examples with CPU (user + system) or elapsed time > 5s
user system elapsed
add_levelpaths 4.621 0.063 5.622
Flavor: r-devel-linux-x86_64-debian-clang
Version: 1.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [80s/40s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(hydroloom)
>
> test_check("hydroloom")
Starting 2 test processes.
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
| | 0%
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R:
|
|========= | 13%
> test_check_hy_graph.R:
|
|=================== | 27%
> test_check_hy_graph.R:
|
|============================ | 40%
> test_check_hy_graph.R:
|
|====================================== | 54%
> test_check_hy_graph.R:
|
|=============================================== | 67%
> test_check_hy_graph.R:
|
|======================================================== | 80%
> test_check_hy_graph.R:
|
|================================================================== | 94%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===== | 8%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=========== | 15%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================ | 23%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================== | 30%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========================== | 38%
> test_check_hy_graph.R:
|
|================================ | 45%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================== | 53%
> test_check_hy_graph.R:
|
|========================================== | 60%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=============================================== | 68%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================================== | 75%
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=============================================================== | 90%
> test_check_hy_graph.R:
|
|===================================================================== | 98%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========= | 13%
> test_check_hy_graph.R:
|
|================== | 26%
> test_check_hy_graph.R:
|
|=========================== | 38%
> test_check_hy_graph.R:
|
|==================================== | 51%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|============================================= | 64%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|====================================================== | 77%
> test_check_hy_graph.R:
|
|=============================================================== | 90%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
Saving _problems/test_get_hydro_location-13.R
> test_hydroloom.R: no hy class attribute
> test_hydroloom.R: some na toids
> test_hydroloom.R: no original names attribute
> test_hydroloom.R: no hy class attribute
Saving _problems/test_index-17.R
Saving _problems/test_index-77.R
Saving _problems/test_index-132.R
Saving _problems/test_index-156.R
Saving _problems/test_index-211.R
Saving _problems/test_index-245.R
Saving _problems/test_index-269.R
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test_add_levelpaths.R:158:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_get_hydro_location.R:13:3'): get location ──────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(sample_flines, points) at test_get_hydro_location.R:13:3
2. └─hydroloom:::index_points_to_lines.data.frame(sample_flines, points)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:16:3'): index to waterbodies ───────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_index.R:16:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─hydroloom::index_points_to_waterbodies(wb, gage_l)
8. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:72:3'): point indexing to nearest existing node works as expected ──
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:72:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:128:5'): point indexing works without measures ─────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:128:5
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:147:3'): point indexing to for multiple points works ───
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:147:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point, search_radius = sr)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:210:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:210:3
2. │ └─base::withCallingHandlers(...)
3. ├─hydroloom::index_points_to_lines(lines, points, search_radius = 500)
4. └─hydroloom:::index_points_to_lines.data.frame(lines, points, search_radius = 500)
5. ├─hydroloom::index_points_to_lines(...)
6. └─hydroloom:::index_points_to_lines.hy(...)
7. ├─dplyr::left_join(...)
8. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:241:3'): no duplicates when using precision ────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─dplyr::filter(...) at test_index.R:241:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:266:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(...) at test_index.R:266:3
2. └─hydroloom:::index_points_to_lines.data.frame(...)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 1.1.1
Check: examples
Result: ERROR
Running examples in ‘hydroloom-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: disambiguate_indexes
> ### Title: Disambiguate Flowline Indexes
> ### Aliases: disambiguate_indexes
>
> ### ** Examples
>
> if(require(nhdplusTools)) {
+ source(system.file("extdata", "sample_flines.R", package = "nhdplusTools"))
+
+ hydro_location <- sf::st_sf(id = c(1, 2, 3),
+ geom = sf::st_sfc(list(sf::st_point(c(-76.86934, 39.49328)),
+ sf::st_point(c(-76.91711, 39.40884)),
+ sf::st_point(c(-76.88081, 39.36354))),
+ crs = 4326),
+ totda = c(23.6, 7.3, 427.9),
+ nameid = c("Patapsco", "", "Falls Run River"))
+
+ indexes <- index_points_to_lines(sample_flines,
+ hydro_location,
+ search_radius = units::set_units(0.2, "degrees"),
+ max_matches = 10)
+
+ disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, TotDASqKM),
+ dplyr::select(hydro_location, id, totda))
+
+ result <- disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, GNIS_NAME),
+ dplyr::select(hydro_location, id, nameid))
+
+ result[result$point_id == 1, ]
+
+ result[result$point_id == 2, ]
+
+ result[result$point_id == 3, ]
+ }
Loading required package: nhdplusTools
Attaching package: ‘nhdplusTools’
The following object is masked from ‘package:hydroloom’:
make_node_topology
Warning in index_points_to_lines.hy(x, points, search_radius = search_radius, :
converting to LINESTRING, this may be slow, check results
Error in `[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id)) :
attempt access index 4/4 in VECTOR_ELT
Calls: index_points_to_lines ... index_points_to_lines.hy -> left_join -> matcher_dt -> [ -> [.data.table
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [50s/27s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(hydroloom)
>
> test_check("hydroloom")
Starting 2 test processes.
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
| | 0%
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|========= | 13%
|
|=================== | 27%
> test_check_hy_graph.R:
|
|============================ | 40%
> test_check_hy_graph.R:
|
|====================================== | 54%
> test_check_hy_graph.R:
|
|=============================================== | 67%
> test_check_hy_graph.R:
|
|======================================================== | 80%
> test_check_hy_graph.R:
|
|================================================================== | 94%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|===== | 8%
> test_check_hy_graph.R:
|
|=========== | 15%
> test_check_hy_graph.R:
|
|================ | 23%
> test_check_hy_graph.R:
|
|===================== | 30%
> test_check_hy_graph.R:
|
|========================== | 38%
> test_check_hy_graph.R:
|
|================================ | 45%
> test_check_hy_graph.R:
|
|===================================== | 53%
> test_check_hy_graph.R:
|
|========================================== | 60%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=============================================== | 68%
> test_check_hy_graph.R:
|
|===================================================== | 75%
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R:
|
|=============================================================== | 90%
> test_check_hy_graph.R:
|
|===================================================================== | 98%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|========= | 13%
> test_check_hy_graph.R:
|
|================== | 26%
> test_check_hy_graph.R:
|
|=========================== | 38%
> test_check_hy_graph.R:
|
|==================================== | 51%
> test_check_hy_graph.R:
|
|============================================= | 64%
> test_check_hy_graph.R:
|
|====================================================== | 77%
> test_check_hy_graph.R:
|
|=============================================================== | 90%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|======================================================================| 100%
Saving _problems/test_get_hydro_location-13.R
> test_hydroloom.R: no hy class attribute
> test_hydroloom.R: some na toids
> test_hydroloom.R: no original names attribute
> test_hydroloom.R: no hy class attribute
Saving _problems/test_index-17.R
Saving _problems/test_index-77.R
Saving _problems/test_index-132.R
Saving _problems/test_index-156.R
Saving _problems/test_index-211.R
Saving _problems/test_index-245.R
Saving _problems/test_index-269.R
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test_add_levelpaths.R:158:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_get_hydro_location.R:13:3'): get location ──────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(sample_flines, points) at test_get_hydro_location.R:13:3
2. └─hydroloom:::index_points_to_lines.data.frame(sample_flines, points)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:16:3'): index to waterbodies ───────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_index.R:16:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─hydroloom::index_points_to_waterbodies(wb, gage_l)
8. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:72:3'): point indexing to nearest existing node works as expected ──
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:72:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:128:5'): point indexing works without measures ─────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:128:5
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:147:3'): point indexing to for multiple points works ───
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:147:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point, search_radius = sr)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:210:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:210:3
2. │ └─base::withCallingHandlers(...)
3. ├─hydroloom::index_points_to_lines(lines, points, search_radius = 500)
4. └─hydroloom:::index_points_to_lines.data.frame(lines, points, search_radius = 500)
5. ├─hydroloom::index_points_to_lines(...)
6. └─hydroloom:::index_points_to_lines.hy(...)
7. ├─dplyr::left_join(...)
8. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:241:3'): no duplicates when using precision ────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─dplyr::filter(...) at test_index.R:241:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:266:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(...) at test_index.R:266:3
2. └─hydroloom:::index_points_to_lines.data.frame(...)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.1.1
Check: examples
Result: ERROR
Running examples in ‘hydroloom-Ex.R’ failed
The error most likely occurred in:
> ### Name: disambiguate_indexes
> ### Title: Disambiguate Flowline Indexes
> ### Aliases: disambiguate_indexes
>
> ### ** Examples
>
> if(require(nhdplusTools)) {
+ source(system.file("extdata", "sample_flines.R", package = "nhdplusTools"))
+
+ hydro_location <- sf::st_sf(id = c(1, 2, 3),
+ geom = sf::st_sfc(list(sf::st_point(c(-76.86934, 39.49328)),
+ sf::st_point(c(-76.91711, 39.40884)),
+ sf::st_point(c(-76.88081, 39.36354))),
+ crs = 4326),
+ totda = c(23.6, 7.3, 427.9),
+ nameid = c("Patapsco", "", "Falls Run River"))
+
+ indexes <- index_points_to_lines(sample_flines,
+ hydro_location,
+ search_radius = units::set_units(0.2, "degrees"),
+ max_matches = 10)
+
+ disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, TotDASqKM),
+ dplyr::select(hydro_location, id, totda))
+
+ result <- disambiguate_indexes(indexes,
+ dplyr::select(sample_flines, COMID, GNIS_NAME),
+ dplyr::select(hydro_location, id, nameid))
+
+ result[result$point_id == 1, ]
+
+ result[result$point_id == 2, ]
+
+ result[result$point_id == 3, ]
+ }
Loading required package: nhdplusTools
Attaching package: ‘nhdplusTools’
The following object is masked from ‘package:hydroloom’:
make_node_topology
Warning in index_points_to_lines.hy(x, points, search_radius = search_radius, :
converting to LINESTRING, this may be slow, check results
Error in `[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id)) :
attempt access index 4/4 in VECTOR_ELT
Calls: index_points_to_lines ... index_points_to_lines.hy -> left_join -> matcher_dt -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 1.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [137s/113s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(hydroloom)
>
> test_check("hydroloom")
Starting 2 test processes.
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|=================================== | 50%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
|
|=================================== | 50%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R:
|
|========= | 13%
> test_check_hy_graph.R:
|
|=================== | 27%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|============================ | 40%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|====================================== | 54%
> test_check_hy_graph.R:
|
|=============================================== | 67%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|======================================================== | 80%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================================================================== | 94%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===== | 8%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=========== | 15%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================ | 23%
> test_check_hy_graph.R:
|
|===================== | 30%
> test_check_hy_graph.R:
|
|========================== | 38%
> test_check_hy_graph.R:
|
|================================ | 45%
> test_check_hy_graph.R:
|
|===================================== | 53%
> test_check_hy_graph.R:
|
|========================================== | 60%
> test_check_hy_graph.R:
|
|=============================================== | 68%
> test_check_hy_graph.R:
|
|===================================================== | 75%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========================================================== | 83%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=============================================================== | 90%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================================================== | 98%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========= | 13%
> test_check_hy_graph.R:
|
|================== | 26%
> test_check_hy_graph.R:
|
|=========================== | 38%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|==================================== | 51%
> test_check_hy_graph.R:
|
|============================================= | 64%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|====================================================== | 77%
> test_check_hy_graph.R:
|
|=============================================================== | 90%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|======================================================================| 100%
Saving _problems/test_get_hydro_location-13.R
> test_hydroloom.R: no hy class attribute
> test_hydroloom.R: some na toids
> test_hydroloom.R: no original names attribute
> test_hydroloom.R: no hy class attribute
Saving _problems/test_index-17.R
Saving _problems/test_index-77.R
Saving _problems/test_index-132.R
Saving _problems/test_index-156.R
Saving _problems/test_index-211.R
Saving _problems/test_index-245.R
Saving _problems/test_index-269.R
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test_add_levelpaths.R:158:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_get_hydro_location.R:13:3'): get location ──────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(sample_flines, points) at test_get_hydro_location.R:13:3
2. └─hydroloom:::index_points_to_lines.data.frame(sample_flines, points)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:16:3'): index to waterbodies ───────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_index.R:16:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─hydroloom::index_points_to_waterbodies(wb, gage_l)
8. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:72:3'): point indexing to nearest existing node works as expected ──
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:72:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:128:5'): point indexing works without measures ─────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:128:5
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:147:3'): point indexing to for multiple points works ───
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:147:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point, search_radius = sr)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:210:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:210:3
2. │ └─base::withCallingHandlers(...)
3. ├─hydroloom::index_points_to_lines(lines, points, search_radius = 500)
4. └─hydroloom:::index_points_to_lines.data.frame(lines, points, search_radius = 500)
5. ├─hydroloom::index_points_to_lines(...)
6. └─hydroloom:::index_points_to_lines.hy(...)
7. ├─dplyr::left_join(...)
8. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:241:3'): no duplicates when using precision ────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─dplyr::filter(...) at test_index.R:241:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:266:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(...) at test_index.R:266:3
2. └─hydroloom:::index_points_to_lines.data.frame(...)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 1.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [123s/94s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(hydroloom)
>
> test_check("hydroloom")
Starting 2 test processes.
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
|
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R: found loop at 3
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R:
|
|========================================================== | 83%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|=================================== | 50%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========= | 13%
> test_check_hy_graph.R:
|
|=================== | 27%
> test_check_hy_graph.R:
|
|============================ | 40%
> test_check_hy_graph.R:
|
|====================================== | 54%
> test_check_hy_graph.R:
|
|=============================================== | 67%
> test_check_hy_graph.R:
|
|======================================================== | 80%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================================================================== | 94%
> test_check_hy_graph.R:
|
|======================================================================| 100%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===== | 8%
> test_check_hy_graph.R:
|
|=========== | 15%
> test_check_hy_graph.R:
|
|================ | 23%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================== | 30%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========================== | 38%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================================ | 45%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================== | 53%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========================================== | 60%
> test_check_hy_graph.R:
|
|=============================================== | 68%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================================== | 75%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========================================================== | 83%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=============================================================== | 90%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|===================================================================== | 98%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|======================================================================| 100%
> test_check_hy_graph.R:
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|========= | 13%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|================== | 26%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|=========================== | 38%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|==================================== | 51%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|============================================= | 64%
> test_check_hy_graph.R:
|
|====================================================== | 77%
> test_check_hy_graph.R:
|
|=============================================================== | 90%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|======================================================================| 100%
> test_check_hy_graph.R:
|
| | 0%
> test_check_hy_graph.R:
|
> test_check_hy_graph.R:
|======================================================================| 100%
Saving _problems/test_get_hydro_location-13.R
> test_hydroloom.R: no hy class attribute
> test_hydroloom.R: some na toids
> test_hydroloom.R: no original names attribute
> test_hydroloom.R: no hy class attribute
Saving _problems/test_index-17.R
Saving _problems/test_index-77.R
Saving _problems/test_index-132.R
Saving _problems/test_index-156.R
Saving _problems/test_index-211.R
Saving _problems/test_index-245.R
Saving _problems/test_index-269.R
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test_add_levelpaths.R:158:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_get_hydro_location.R:13:3'): get location ──────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(sample_flines, points) at test_get_hydro_location.R:13:3
2. └─hydroloom:::index_points_to_lines.data.frame(sample_flines, points)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:16:3'): index to waterbodies ───────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_index.R:16:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─hydroloom::index_points_to_waterbodies(wb, gage_l)
8. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:72:3'): point indexing to nearest existing node works as expected ──
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:72:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:128:5'): point indexing works without measures ─────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:128:5
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point)
5. └─hydroloom:::index_points_to_lines.data.frame(flines_in, point)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:147:3'): point indexing to for multiple points works ───
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test_index.R:147:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─hydroloom::index_points_to_lines(flines_in, point, search_radius = sr)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:210:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:210:3
2. │ └─base::withCallingHandlers(...)
3. ├─hydroloom::index_points_to_lines(lines, points, search_radius = 500)
4. └─hydroloom:::index_points_to_lines.data.frame(lines, points, search_radius = 500)
5. ├─hydroloom::index_points_to_lines(...)
6. └─hydroloom:::index_points_to_lines.hy(...)
7. ├─dplyr::left_join(...)
8. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
9. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
10. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:241:3'): no duplicates when using precision ────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─dplyr::filter(...) at test_index.R:241:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:266:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─hydroloom::index_points_to_lines(...) at test_index.R:266:3
2. └─hydroloom:::index_points_to_lines.data.frame(...)
3. ├─hydroloom::index_points_to_lines(...)
4. └─hydroloom:::index_points_to_lines.hy(...)
5. ├─dplyr::left_join(...)
6. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
7. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
8. └─data.table:::`[.data.table`(...)
[ FAIL 8 | WARN 4 | SKIP 1 | PASS 343 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Current CRAN status: OK: 13
Current CRAN status: ERROR: 3, OK: 10
Version: 1.4.1
Check: examples
Result: ERROR
Running examples in ‘nhdplusTools-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: disambiguate_flowline_indexes
> ### Title: Disambiguate Flowline Indexes
> ### Aliases: disambiguate_flowline_indexes
>
> ### ** Examples
>
> source(system.file("extdata", "sample_flines.R", package = "nhdplusTools"))
>
> hydro_location <- sf::st_sf(id = c(1, 2, 3),
+ geom = sf::st_sfc(list(sf::st_point(c(-76.86934, 39.49328)),
+ sf::st_point(c(-76.91711, 39.40884)),
+ sf::st_point(c(-76.88081, 39.36354))),
+ crs = 4326),
+ totda = c(23.6, 7.3, 427.9),
+ nameid = c("Patapsco", "", "Falls Run River"))
>
> flowpath <- dplyr::select(sample_flines,
+ comid = COMID,
+ totda = TotDASqKM,
+ nameid = GNIS_NAME,
+ REACHCODE,
+ ToMeas,
+ FromMeas)
>
> indexes <- get_flowline_index(flowpath,
+ hydro_location,
+ search_radius = 0.2,
+ max_matches = 10)
Warning in check_search_radius(search_radius, points) :
search_radius units not set, trying units of points CRS.
Warning in index_points_to_lines.hy(x, points, search_radius = search_radius, :
converting to LINESTRING, this may be slow, check results
Error in `[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id)) :
attempt access index 4/4 in VECTOR_ELT
Calls: get_flowline_index ... index_points_to_lines.hy -> left_join -> matcher_dt -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 1.4.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [63s/43s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library("testthat")
>
> test_check("nhdplusTools")
Loading required package: nhdplusTools
Starting 2 test processes.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
Saving _problems/test_index-114.R
Saving _problems/test_index-151.R
Saving _problems/test_index-202.R
Saving _problems/test_wb_index-14.R
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
══ Skipped tests (58) ══════════════════════════════════════════════════════════
• On CRAN (58): 'test_00_plot_bbox_nhdplus.R:5:3',
'test_00_plot_integration_nhdplus.R:6:3',
'test_00_plot_local_extra_nhdplus.R:9:3', 'test_00_plot_local_nhdplus.R:9:3',
'test_00_plot_nhdplus.R:6:3', 'test_00_plot_nhdplus.R:90:3',
'test_00_plot_nhdplus.R:134:3', 'test_00_plot_nhdplus.R:164:3',
'test_00_plot_nhdplus.R:201:3', 'test_01_get_nldi.R:5:3',
'test_01_get_nldi.R:25:3', 'test_01_get_nldi.R:85:3',
'test_01_get_nldi.R:122:3', 'test_01_get_nldi.R:140:3',
'test_01_get_nldi.R:176:3', 'test_01_get_nldi.R:224:3',
'test_02_subset.R:135:3', 'test_02_subset.R:191:3',
'test_03_get_functions.R:20:3', 'test_03_get_functions.R:52:3',
'test_03_get_functions.R:75:3', 'test_03_get_functions.R:129:3',
'test_03_get_functions.R:200:3', 'test_03_get_functions.R:216:3',
'test_03_get_functions.R:229:3', 'test_03_get_functions.R:247:3',
'test_03_get_functions.R:254:3', 'test_arcrest.R:51:3',
'test_02_subset_extras.R:94:3', 'test_02_subset_extras.R:149:3',
'test_geoconnex.R:3:3', 'test_geoconnex.R:14:3', 'test_get_3dhp.R:3:3',
'test_get_nhdphr.R:3:3', 'test_get_nhdplus.R:8:3', 'test_get_nhdplus.R:29:3',
'test_get_nhdplus.R:49:3', 'test_get_nhdplushr.R:3:3',
'test_get_nhdplushr.R:23:3', 'test_get_nhdplushr.R:53:3',
'test_get_nhdplushr.R:80:3', 'test_get_nhdplushr.R:101:3',
'test_get_nhdplushr.R:147:3', 'test_get_nhdplushr.R:174:3',
'test_get_nhdplushr.R:196:3', 'test_get_codes.R:4:3', 'test_get_vaa.R:4:3',
'test_get_vaa.R:38:3', 'test_index.R:13:5', 'test_index.R:61:3',
'test_map_nhdplus.R:4:3', 'test_navigate.R:4:3', 'test_navigate.R:71:3',
'test_nhdplusTools.R:41:3', 'test_nhdplusTools.R:50:3',
'test_rescale_catchments.R:3:3', 'test_run_plus_attributes.R:20:3',
'test_get_path.R:69:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_index.R:113:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:113:3
2. │ └─base::withCallingHandlers(...)
3. └─nhdplusTools::get_flowline_index(lines, points, search_radius = 500)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:148:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(...) at test_index.R:148:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:202:3'): get location ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(sample_flines, points) at test_index.R:202:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_wb_index.R:14:1'): index to waterbodies ────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_wb_index.R:14:1
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─nhdplusTools::get_waterbody_index(wb, gage_l)
8. └─hydroloom::index_points_to_waterbodies(...)
9. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 1.4.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [40s/24s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library("testthat")
>
> test_check("nhdplusTools")
Loading required package: nhdplusTools
Starting 2 test processes.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
Saving _problems/test_index-114.R
Saving _problems/test_index-151.R
Saving _problems/test_index-202.R
Saving _problems/test_wb_index-14.R
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
══ Skipped tests (58) ══════════════════════════════════════════════════════════
• On CRAN (58): 'test_00_plot_bbox_nhdplus.R:5:3',
'test_00_plot_integration_nhdplus.R:6:3',
'test_00_plot_local_extra_nhdplus.R:9:3', 'test_00_plot_local_nhdplus.R:9:3',
'test_01_get_nldi.R:5:3', 'test_01_get_nldi.R:25:3',
'test_01_get_nldi.R:85:3', 'test_01_get_nldi.R:122:3',
'test_01_get_nldi.R:140:3', 'test_01_get_nldi.R:176:3',
'test_01_get_nldi.R:224:3', 'test_00_plot_nhdplus.R:6:3',
'test_00_plot_nhdplus.R:90:3', 'test_00_plot_nhdplus.R:134:3',
'test_00_plot_nhdplus.R:164:3', 'test_00_plot_nhdplus.R:201:3',
'test_02_subset.R:135:3', 'test_02_subset.R:191:3',
'test_03_get_functions.R:20:3', 'test_03_get_functions.R:52:3',
'test_03_get_functions.R:75:3', 'test_03_get_functions.R:129:3',
'test_03_get_functions.R:200:3', 'test_03_get_functions.R:216:3',
'test_03_get_functions.R:229:3', 'test_03_get_functions.R:247:3',
'test_03_get_functions.R:254:3', 'test_arcrest.R:51:3',
'test_02_subset_extras.R:94:3', 'test_02_subset_extras.R:149:3',
'test_geoconnex.R:3:3', 'test_geoconnex.R:14:3', 'test_get_3dhp.R:3:3',
'test_get_nhdphr.R:3:3', 'test_get_nhdplus.R:8:3', 'test_get_nhdplus.R:29:3',
'test_get_nhdplus.R:49:3', 'test_get_nhdplushr.R:3:3',
'test_get_nhdplushr.R:23:3', 'test_get_nhdplushr.R:53:3',
'test_get_nhdplushr.R:80:3', 'test_get_nhdplushr.R:101:3',
'test_get_nhdplushr.R:147:3', 'test_get_nhdplushr.R:174:3',
'test_get_nhdplushr.R:196:3', 'test_get_codes.R:4:3', 'test_get_vaa.R:4:3',
'test_get_vaa.R:38:3', 'test_index.R:13:5', 'test_index.R:61:3',
'test_map_nhdplus.R:4:3', 'test_navigate.R:4:3', 'test_navigate.R:71:3',
'test_nhdplusTools.R:41:3', 'test_nhdplusTools.R:50:3',
'test_rescale_catchments.R:3:3', 'test_get_path.R:69:3',
'test_run_plus_attributes.R:20:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_index.R:113:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:113:3
2. │ └─base::withCallingHandlers(...)
3. └─nhdplusTools::get_flowline_index(lines, points, search_radius = 500)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:148:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(...) at test_index.R:148:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:202:3'): get location ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(sample_flines, points) at test_index.R:202:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_wb_index.R:14:1'): index to waterbodies ────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_wb_index.R:14:1
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─nhdplusTools::get_waterbody_index(wb, gage_l)
8. └─hydroloom::index_points_to_waterbodies(...)
9. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.4.1
Check: examples
Result: ERROR
Running examples in ‘nhdplusTools-Ex.R’ failed
The error most likely occurred in:
> ### Name: disambiguate_flowline_indexes
> ### Title: Disambiguate Flowline Indexes
> ### Aliases: disambiguate_flowline_indexes
>
> ### ** Examples
>
> source(system.file("extdata", "sample_flines.R", package = "nhdplusTools"))
>
> hydro_location <- sf::st_sf(id = c(1, 2, 3),
+ geom = sf::st_sfc(list(sf::st_point(c(-76.86934, 39.49328)),
+ sf::st_point(c(-76.91711, 39.40884)),
+ sf::st_point(c(-76.88081, 39.36354))),
+ crs = 4326),
+ totda = c(23.6, 7.3, 427.9),
+ nameid = c("Patapsco", "", "Falls Run River"))
>
> flowpath <- dplyr::select(sample_flines,
+ comid = COMID,
+ totda = TotDASqKM,
+ nameid = GNIS_NAME,
+ REACHCODE,
+ ToMeas,
+ FromMeas)
>
> indexes <- get_flowline_index(flowpath,
+ hydro_location,
+ search_radius = 0.2,
+ max_matches = 10)
Warning in check_search_radius(search_radius, points) :
search_radius units not set, trying units of points CRS.
Warning in index_points_to_lines.hy(x, points, search_radius = search_radius, :
converting to LINESTRING, this may be slow, check results
Error in `[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id)) :
attempt access index 4/4 in VECTOR_ELT
Calls: get_flowline_index ... index_points_to_lines.hy -> left_join -> matcher_dt -> [ -> [.data.table
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 1.4.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [96s/113s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library("testthat")
>
> test_check("nhdplusTools")
Loading required package: nhdplusTools
Starting 2 test processes.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
> test_02_subset.R: All intersections performed in latitude/longitude.
Saving _problems/test_index-114.R
Saving _problems/test_index-151.R
Saving _problems/test_index-202.R
Saving _problems/test_wb_index-14.R
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
══ Skipped tests (58) ══════════════════════════════════════════════════════════
• On CRAN (58): 'test_00_plot_bbox_nhdplus.R:5:3',
'test_00_plot_integration_nhdplus.R:6:3',
'test_00_plot_local_extra_nhdplus.R:9:3', 'test_00_plot_local_nhdplus.R:9:3',
'test_01_get_nldi.R:5:3', 'test_01_get_nldi.R:25:3',
'test_01_get_nldi.R:85:3', 'test_01_get_nldi.R:122:3',
'test_01_get_nldi.R:140:3', 'test_01_get_nldi.R:176:3',
'test_01_get_nldi.R:224:3', 'test_00_plot_nhdplus.R:6:3',
'test_00_plot_nhdplus.R:90:3', 'test_00_plot_nhdplus.R:134:3',
'test_00_plot_nhdplus.R:164:3', 'test_00_plot_nhdplus.R:201:3',
'test_02_subset.R:135:3', 'test_02_subset.R:191:3',
'test_03_get_functions.R:20:3', 'test_03_get_functions.R:52:3',
'test_03_get_functions.R:75:3', 'test_03_get_functions.R:129:3',
'test_03_get_functions.R:200:3', 'test_03_get_functions.R:216:3',
'test_03_get_functions.R:229:3', 'test_03_get_functions.R:247:3',
'test_03_get_functions.R:254:3', 'test_02_subset_extras.R:94:3',
'test_02_subset_extras.R:149:3', 'test_arcrest.R:51:3',
'test_geoconnex.R:3:3', 'test_geoconnex.R:14:3', 'test_get_3dhp.R:3:3',
'test_get_nhdphr.R:3:3', 'test_get_nhdplus.R:8:3', 'test_get_nhdplus.R:29:3',
'test_get_nhdplus.R:49:3', 'test_get_nhdplushr.R:3:3',
'test_get_nhdplushr.R:23:3', 'test_get_nhdplushr.R:53:3',
'test_get_nhdplushr.R:80:3', 'test_get_nhdplushr.R:101:3',
'test_get_nhdplushr.R:147:3', 'test_get_nhdplushr.R:174:3',
'test_get_nhdplushr.R:196:3', 'test_get_codes.R:4:3', 'test_get_vaa.R:4:3',
'test_get_vaa.R:38:3', 'test_index.R:13:5', 'test_index.R:61:3',
'test_map_nhdplus.R:4:3', 'test_navigate.R:4:3', 'test_navigate.R:71:3',
'test_nhdplusTools.R:41:3', 'test_nhdplusTools.R:50:3',
'test_rescale_catchments.R:3:3', 'test_run_plus_attributes.R:20:3',
'test_get_path.R:69:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_index.R:113:3'): multipart indexing ────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::capture_warnings(...) at test_index.R:113:3
2. │ └─base::withCallingHandlers(...)
3. └─nhdplusTools::get_flowline_index(lines, points, search_radius = 500)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.data.frame(...)
6. ├─hydroloom::index_points_to_lines(...)
7. └─hydroloom:::index_points_to_lines.hy(...)
8. ├─dplyr::left_join(...)
9. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:148:3'): disambiguate ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(...) at test_index.R:148:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_index.R:202:3'): get location ──────────────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. └─nhdplusTools::get_flowline_index(sample_flines, points) at test_index.R:202:3
2. ├─hydroloom::index_points_to_lines(...)
3. └─hydroloom:::index_points_to_lines.data.frame(...)
4. ├─hydroloom::index_points_to_lines(...)
5. └─hydroloom:::index_points_to_lines.hy(...)
6. ├─dplyr::left_join(...)
7. └─hydroloom:::matcher_dt(x, points, search_radius, max_matches = max_matches)
8. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
9. └─data.table:::`[.data.table`(...)
── Error ('test_wb_index.R:14:1'): index to waterbodies ────────────────────────
Error in ``[.data.table`(matched, , `:=`(N, seq_len(.N)), by = list(point_id))`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_wb_index.R:14:1
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─nhdplusTools::get_waterbody_index(wb, gage_l)
8. └─hydroloom::index_points_to_waterbodies(...)
9. └─hydroloom:::matcher_dt(waterbodies, st_coordinates(points), search_radius)
10. ├─matched[, `:=`(N, seq_len(.N)), by = list(point_id)]
11. └─data.table:::`[.data.table`(...)
[ FAIL 4 | WARN 0 | SKIP 58 | PASS 300 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Current CRAN status: OK: 13