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 Jan. 2, 2025, 12:25 a.m.