tests/testthat/testobserved.R

context("Observation")

test_that("lenSequences", {
    expect_error(lenSequences(3)) # wrong class

    # check sequence length
    seqs=Biostrings::DNAStringSet(c("aaa","aNa","aR"))
    expect_equal(lenSequences(seqs),c(3,3,2))
})

Try the motifcounter package in your browser

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

motifcounter documentation built on Nov. 8, 2020, 5:44 p.m.