tests/testthat/test-searchIPA.R

context("R/data-search-ipa.R")

test_that("search IPA returns properly", {
  expect_equal(nrow(searchIPA("_h", "xsampa")), 1)
  expect_true(nrow(searchIPA("affricate", "feature")) > 1)
})
liao961120/linguisticsdown documentation built on May 6, 2019, 8:08 p.m.