tests/testthat/test-capitalEu.r

context("Checking capitalEu function")
test_that("check, capitalEu", {

  vRes <- capitalEu("POLAND", "lower")

  expect_equal(vRes, "warsaw")

})
adamoleksak/sevenPackage documentation built on May 26, 2019, 12:30 a.m.