tests/testthat/test-getGeneSymbols.R

context("getGeneSymbols")

test_that("getGeneSymbols works", {
    library(org.Hs.eg.db)
    geneSymbols <- getGeneSymbols(orgDb = "org.Hs.eg.db")
    expect_is(geneSymbols, "character")
    expect_gt(length(geneSymbols), 1)
})

Try the GA4GHshiny package in your browser

Any scripts or data that you put into this service are public.

GA4GHshiny documentation built on Nov. 8, 2020, 5:56 p.m.