tests/testthat/test_plot_map.R

In sharksmhi/tryout: Automatic quality control of physical, chemical and marine biological data generated by the SHARK system

library(testthat)

context("plotmap")

test_that("plot_map throws no errors", {
  expect_silent(plot_map(abra, zoom = TRUE))
  expect_silent(plot_map(abra, zoom = FALSE))
})

test_that("plot_map_leaflet throws no errors", {
  expect_silent(plot_map_leaflet(abra))
  expect_silent(plot_map_leaflet(abra, popup = "datasetID"))
})