tests/testthat/test-SangerContig-Compare.R

test_that("sangerContig vs sangerContigFa Initial test", {
    expect_equal(sangerContig@contigName, sangerContigFa@contigName)
    expect_equal(as.character(sangerContig@contigSeq), as.character(sangerContigFa@contigSeq))

    expect_equal(sangerContig2@contigName, sangerContigFa2@contigName)
    expect_equal(as.character(sangerContig2@contigSeq), as.character(sangerContigFa2@contigSeq))
})

Try the sangeranalyseR package in your browser

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

sangeranalyseR documentation built on Nov. 8, 2020, 5:59 p.m.