tests/testthat/test-addPercent.R

test_that("Percent sign is added",{
    expect_equal(.addPercent("a"), "a%")
})

test_that("Message is returned by factors",{
    expect_message(.addPercent(as.factor("a")))
})
steveped/ngsReports documentation built on May 9, 2024, 10:07 a.m.