tests/testthat/test-automorphismByRanges.R

test_that("automorphismByRanges function test", {
    data(autm, package = "GenomAutomorphism")
    test1 <- automorphismByRanges(x = autm[c(24:35)])
    expect_true(test1$cube[1] == "TGCA")
})
genomaths/GenomAutomorphism documentation built on Jan. 2, 2025, 12:25 a.m.