tests/testthat/test-lexical_sentences.R

context("lexical_sentences")

test_that("lexical_sentences", {
	skip_on_cran()

  tt <- lexical_sentences("cellular")

  expect_is(tt, "list")
  expect_match(tt$sentence, "cellular")
})
ropensci/rif documentation built on May 18, 2022, 6:40 p.m.