tests/testthat/test-import-clean-names.R

In poldham/underwater: Access underwater place names from a range of sources for text mining and machine learning

context("zzz-clean-names-function")
# file is in inst
#test_that("rename works", {
#  test_names <- clean_names(system.file("gebco_raw_sample.rda", package = "underwater"))
#  test_char <- stringr::str_detect(names(test_names), "\\s|[(]|[)]|/")
#  expect_false(any(test_char))
#})