tests/testthat/test-esp_get_can_box.R

In dieghernan/mapSpain: Administrative Boundaries of Spain

test_that("Testing can bbox", {
  expect_error(esp_get_can_box(style = "ee"))
  expect_error(esp_get_can_box(epsg = "ee"))
  expect_silent(esp_get_can_box())
  expect_silent(esp_get_can_box("box"))
  expect_silent(esp_get_can_box("left"))
  expect_silent(esp_get_can_box(moveCAN = FALSE))
  expect_silent(esp_get_can_box(moveCAN = c(10, 10)))

  expect_error(esp_get_can_provinces(epsg = "ee"))
  expect_silent(esp_get_can_provinces(moveCAN = FALSE))
  expect_silent(esp_get_can_provinces(moveCAN = c(10, 10)))
})