tests/testthat/test-stopwords_getsources.R

context("stopwords_getsources")

test_that("returns all source names", {
  source_names <- names(getOption("stopwords_sources"))
  expect_equal(source_names, stopwords_getsources())
})
quanteda/stopwords documentation built on Jan. 13, 2022, 1:36 a.m.