Running ‘testthat.R’ [17s/195s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(nominatimlite)
  > 
  > test_check("nominatimlite")
  Starting 2 test processes
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure (test-geo_address_lookup.R:4:3): Returning empty query ──────────────
  ncol(obj) == 3 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup.R:5:3): Returning empty query ──────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup.R:7:3): Returning empty query ──────────────
  obj$query == "Rxbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup.R:8:3): Returning empty query ──────────────
  is.na(obj$lat) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup.R:9:3): Returning empty query ──────────────
  is.na(obj$lon) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup.R:20:3): Checking query ────────────────────
  ncol(geo_address_lookup(34633854, "W")) (`actual`) not equal to 4 (`expected`).
  
    `actual`: 3
  `expected`: 4
  ── Failure (test-geo_address_lookup.R:21:3): Checking query ────────────────────
  ncol(geo_address_lookup(34633854, "W", full_results = TRUE)) is not strictly more than 4. Difference: -1
  ── Failure (test-geo_address_lookup_sf.R:4:3): Returning empty query ───────────
  ncol(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup_sf.R:5:3): Returning empty query ───────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup_sf.R:7:3): Returning empty query ───────────
  obj$query == "Rxbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_address_lookup_sf.R:13:3): Data format ────────────────────
  geo_address_lookup_sf(34633854, "W") inherits from 'data.frame' not 'sf'.
  ── Failure (test-geo_address_lookup_sf.R:18:3): Checking query ─────────────────
  ncol(geo_address_lookup_sf(34633854, "W")) (`actual`) not equal to 3 (`expected`).
  
    `actual`: 1
  `expected`: 3
  ── Failure (test-geo_address_lookup_sf.R:19:3): Checking query ─────────────────
  ncol(geo_address_lookup_sf(34633854, "W", full_results = TRUE)) is not strictly more than 3. Difference: -2
  ── Error (test-geo_address_lookup_sf.R:28:3): Checking query ───────────────────
  Error in `UseMethod("st_geometry")`: no applicable method for 'st_geometry' applied to an object of class "data.frame"
  Backtrace:
      █
   1. ├─testthat::expect_true(...)
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─sf::st_geometry_type(...)
   5.   └─sf::st_geometry(x)
  ── Failure (test-geo_amenity.R:7:3): Returning empty query ─────────────────────
  ncol(obj) == 3 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity.R:8:3): Returning empty query ─────────────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity.R:10:3): Returning empty query ────────────────────
  obj$query == "xbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity.R:11:3): Returning empty query ────────────────────
  is.na(obj$lat) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity.R:12:3): Returning empty query ────────────────────
  is.na(obj$lon) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity.R:29:3): Checking query ───────────────────────────
  ncol(...) (`actual`) not equal to 4 (`expected`).
  
    `actual`: 3
  `expected`: 4
  ── Failure (test-geo_amenity.R:33:3): Checking query ───────────────────────────
  ncol(...) is not strictly more than 4. Difference: -1
  ── Failure (test-geo_amenity.R:37:3): Checking query ───────────────────────────
  nrow(...) is not strictly more than 4. Difference: -3
  ── Failure (test-geo_amenity_sf.R:7:3): Returning empty query ──────────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity_sf.R:8:3): Returning empty query ──────────────────
  ncol(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity_sf.R:9:3): Returning empty query ──────────────────
  obj$query == "xbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_amenity_sf.R:18:3): Data format ───────────────────────────
  geo_amenity_sf(...) inherits from 'data.frame' not 'sf'.
  ── Failure (test-geo_amenity_sf.R:27:3): Checking query ────────────────────────
  ncol(...) (`actual`) not equal to 3 (`expected`).
  
    `actual`: 1
  `expected`: 3
  ── Failure (test-geo_amenity_sf.R:31:3): Checking query ────────────────────────
  ncol(...) is not strictly more than 3. Difference: -2
  ── Failure (test-geo_amenity_sf.R:36:3): Checking query ────────────────────────
  nrow(...) is not strictly more than 4. Difference: -3
  ── Error (test-geo_amenity_sf.R:53:3): Checking query ──────────────────────────
  Error in `UseMethod("st_geometry")`: no applicable method for 'st_geometry' applied to an object of class "data.frame"
  Backtrace:
      █
   1. ├─testthat::expect_lt(...)
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─base::nrow(...)
   5. └─nominatimlite::geo_amenity_sf(...)
   6.   └─sf::st_covered_by(all_res, bbox_sf, sparse = FALSE)
   7.     └─sf:::st_geos_binop(...)
   8.       ├─sf:::CPL_geos_binop(...)
   9.       └─sf::st_geometry(x)
  ── Failure (test-geo_lite.R:4:3): Returning empty query ────────────────────────
  ncol(obj) == 3 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite.R:5:3): Returning empty query ────────────────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite.R:7:3): Returning empty query ────────────────────────
  obj$query == "xbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite.R:8:3): Returning empty query ────────────────────────
  is.na(obj$lat) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite.R:9:3): Returning empty query ────────────────────────
  is.na(obj$lon) is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite.R:21:3): Checking query ──────────────────────────────
  ncol(geo_lite(c("Madrid", "Barcelona"))) (`actual`) not equal to 4 (`expected`).
  
    `actual`: 3
  `expected`: 4
  ── Failure (test-geo_lite.R:22:3): Checking query ──────────────────────────────
  ncol(geo_lite("Madrid", full_results = TRUE)) is not strictly more than 4. Difference: -1
  ── Failure (test-geo_lite.R:23:3): Checking query ──────────────────────────────
  nrow(geo_lite("Madrid", limit = 10, custom_query = list(countrycode = "es"))) is not strictly more than 4. Difference: -3
  ── Failure (test-geo_lite_sf.R:4:3): Returning empty query ─────────────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite_sf.R:5:3): Returning empty query ─────────────────────
  ncol(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite_sf.R:6:3): Returning empty query ─────────────────────
  obj$query == "xbzbzbzoa aiaia" is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-geo_lite_sf.R:12:3): Data format ──────────────────────────────
  geo_lite_sf("Madrid") inherits from 'data.frame' not 'sf'.
  ── Failure (test-geo_lite_sf.R:17:3): Checking query ───────────────────────────
  ncol(geo_lite_sf(c("Madrid", "Barcelona"))) (`actual`) not equal to 3 (`expected`).
  
    `actual`: 1
  `expected`: 3
  ── Failure (test-geo_lite_sf.R:18:3): Checking query ───────────────────────────
  ncol(geo_lite_sf("Madrid", full_results = TRUE)) is not strictly more than 3. Difference: -2
  ── Failure (test-geo_lite_sf.R:19:3): Checking query ───────────────────────────
  nrow(geo_lite_sf("Madrid", limit = 10, custom_query = list(countrycode = "es"))) is not strictly more than 4. Difference: -3
  ── Error (test-geo_lite_sf.R:34:3): Checking geometry type ─────────────────────
  Error in `UseMethod("st_geometry")`: no applicable method for 'st_geometry' applied to an object of class "data.frame"
  Backtrace:
      █
   1. ├─testthat::expect_true(...)
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─sf::st_geometry_type(geo_lite_sf("Pentagon"))
   5.   └─sf::st_geometry(x)
  ── Failure (test-reverse_geo_lite.R:4:3): Returning empty query ────────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-reverse_geo_lite.R:22:3): Checking query ──────────────────────
  ncol(reverse_geo_lite(0, 0)) (`actual`) not equal to 3 (`expected`).
  
    `actual`: 1
  `expected`: 3
  ── Failure (test-reverse_geo_lite.R:23:3): Checking query ──────────────────────
  ncol(reverse_geo_lite(0, 0, full_results = TRUE)) is not strictly more than 3. Difference: -2
  ── Failure (test-reverse_geo_lite_sf.R:4:3): Returning empty query ─────────────
  nrow(obj) == 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure (test-reverse_geo_lite_sf.R:17:3): Data format ──────────────────────
  reverse_geo_lite_sf(0, 0) inherits from 'tbl_df'/'tbl'/'data.frame' not 'sf'.
  ── Failure (test-reverse_geo_lite_sf.R:22:3): Checking query ───────────────────
  ncol(reverse_geo_lite_sf(0, 0)) (`actual`) not equal to 4 (`expected`).
  
    `actual`: 1
  `expected`: 4
  ── Failure (test-reverse_geo_lite_sf.R:23:3): Checking query ───────────────────
  ncol(reverse_geo_lite_sf(0, 0, full_results = TRUE)) is not strictly more than 4. Difference: -3
  
  [ FAIL 53 | WARN 0 | SKIP 0 | PASS 50 ]
  Error: Test failures
  Execution halted