context("bioio")
library(AlleleProfileR)
#
test_that("bioio", {
# comparison with samtools faidx frag.fa chr10:40-60
expect_equal(getreferenceC("files/index/frag.fa", "chr10", 40, 60), "CTGCCCAGCTAAGCTCCCATA")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.