tests/testthat/test-codon_dist_matrix.R

test_that("codon_dist_matrix works", {
    x <- codon_dist_matrix(genetic_code = "5", cube = "TGCA", group = "Z4",
                        output = "vector")
    expect_equal(x[[63]], 0.375)
})
genomaths/GenomAutomorphism documentation built on May 10, 2024, 12:11 a.m.