tests/testthat/test-app.R

context("app")

test_that("app works", {
    skip_on_bioc()
    appobj <- app("http://1kgenomes.ga4gh.org/", orgDb = "org.Hs.eg.db",
        txDb = "TxDb.Hsapiens.UCSC.hg19.knownGene")
    expect_is(appobj, "shiny.appobj")
})

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.