tests/testthat/test-get_all_cities.R

cities <- get_all_cities()

test_that("cities is a character vector", {
  expect_equal(is.null(dim(cities)), TRUE)
  expect_equal(class(cities), "character")
})
PatrickSVM/apikolada documentation built on Dec. 18, 2021, 6:42 a.m.