tests/testthat/test-mod_observation_display.R

test_that("get_subset_df returns a dataframe of all observations", {
  one_df <- get_subset_site()
  
  expect_equal(dim(one_df), c(203L, 28L))
  
  
})
ReseauBiodiversiteQuebec/mapselector documentation built on Feb. 22, 2022, 3:13 p.m.