tests/testthat/test-globals.R

test_that("quick tests that global functions run without error",{
    expect_true(class(GREEKSYM_TO_NAME()) == "character")
    expect_true(class(GREEKSYM_TO_LETTER()) == "character")
    expect_true(class(GREEKNAME_TO_LETTER()) == "character")
    expect_true(class(CLONE_DUPS()) == "data.frame")
    expect_true(class(ISOTYPE_CONTROLS()) == "data.frame")
})
HelenLindsay/AbNames documentation built on June 6, 2023, 1:18 p.m.