Running ‘testthat.R’ [13s/81s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(Tivy)
  > 
  > test_check("Tivy")
  [ FAIL 11 | WARN 172 | SKIP 0 | PASS 383 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-coordinate-functions.R:27:3'): dms_to_decimal handles different formats ──
  all(!is.na(result)) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Failure ('test-coordinate-functions.R:28:3'): dms_to_decimal handles different formats ──
  all(result < 0) is not TRUE
  
  `actual`:   <NA>
  `expected`: TRUE
  ── Failure ('test-coordinate-functions.R:41:3'): dms_to_decimal corrects coordinate errors ──
  `dms_to_decimal(coords_with_errors, correct_errors = FALSE)` did not produce any warnings.
  ── Failure ('test-coordinate-functions.R:262:3'): coordinate functions work together ──
  `distance` has type 'logical', not 'double'.
  ── Failure ('test-coordinate-functions.R:264:3'): coordinate functions work together ──
  !is.na(distance) is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Failure ('test-coordinate-functions.R:265:3'): coordinate functions work together ──
  distance >= 0 is not TRUE
  
  `actual`:   <NA>
  `expected`: TRUE
  ── Error ('test-visualization.R:55:3'): plot_fishing_zones creates static plots correctly ──
  Error in `if (abs(first_point[[lat_name]] - lat_min) > 1e-04) {
      min_point <- interpolate_point(line, lat_min, lat_name, lon_name)
      limit_points <- rbind(limit_points, min_point)
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. └─Tivy::plot_fishing_zones(...) at test-visualization.R:55:3
   2.   └─Tivy:::prepare_polygons(data = data, coastline = coastline, coast_parallels = parallels)
   3.     └─Tivy:::extract_points_between_latitudes(...)
  ── Error ('test-visualization.R:72:3'): plot_fishing_zones creates interactive plots correctly ──
  Error in `if (abs(first_point[[lat_name]] - lat_min) > 1e-04) {
      min_point <- interpolate_point(line, lat_min, lat_name, lon_name)
      limit_points <- rbind(limit_points, min_point)
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. └─Tivy::plot_fishing_zones(...) at test-visualization.R:72:3
   2.   └─Tivy:::prepare_polygons(data = data, coastline = coastline, coast_parallels = parallels)
   3.     └─Tivy:::extract_points_between_latitudes(...)
  ── Error ('test-visualization.R:108:3'): plot_fishing_zones handles custom parameters ──
  Error in `if (abs(first_point[[lat_name]] - lat_min) > 1e-04) {
      min_point <- interpolate_point(line, lat_min, lat_name, lon_name)
      limit_points <- rbind(limit_points, min_point)
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. └─Tivy::plot_fishing_zones(...) at test-visualization.R:108:3
   2.   └─Tivy:::prepare_polygons(data = data, coastline = coastline, coast_parallels = parallels)
   3.     └─Tivy:::extract_points_between_latitudes(...)
  ── Error ('test-visualization.R:127:3'): plot_fishing_zones uses default coastline when NULL ──
  Error in `if (abs(first_point[[lat_name]] - lat_min) > 1e-04) {
      min_point <- interpolate_point(line, lat_min, lat_name, lon_name)
      limit_points <- rbind(limit_points, min_point)
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. └─Tivy::plot_fishing_zones(...) at test-visualization.R:127:3
   2.   └─Tivy:::prepare_polygons(data = data, coastline = coastline, coast_parallels = parallels)
   3.     └─Tivy:::extract_points_between_latitudes(...)
  ── Error ('test-visualization.R:506:3'): visualization workflow integration ────
  Error in `if (abs(first_point[[lat_name]] - lat_min) > 1e-04) {
      min_point <- interpolate_point(line, lat_min, lat_name, lon_name)
      limit_points <- rbind(limit_points, min_point)
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. └─Tivy::plot_fishing_zones(...) at test-visualization.R:506:3
   2.   └─Tivy:::prepare_polygons(data = data, coastline = coastline, coast_parallels = parallels)
   3.     └─Tivy:::extract_points_between_latitudes(...)
  
  [ FAIL 11 | WARN 172 | SKIP 0 | PASS 383 ]
  Error: Test failures
  Execution halted