tests/testthat/test-seqStat.R

context("sequence statistics")

data(anoteropsis)

test_that("seqStat gives correct number of bases", {
    expect_equal(seqStat(anoteropsis)[[1]], 395)
})
boopsboops/spider documentation built on May 6, 2019, 8:49 a.m.