if(requireNamespace("testthat", quietly = TRUE)){ library(testthat) library(mappoly) test_check("mappoly") }