tests/testthat/test_one_to_one.R

context("one to one functions")

test_that( "kma_to_readable produces correct output", {
  expect_equal(kma_to_readable('CA_STK'), 'Stockton, CA')
  expect_equal(kma_to_readable('TX_DAL'), 'Dallas, TX')
  expect_equal(kma_to_readable('NY_ALB'), 'Albany, NY')
})
JonMcEntee/lanename documentation built on May 28, 2019, 3:58 p.m.