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 July 24, 2024, 10:45 a.m.