tests/testthat/test-codonmat2pnps.R

data(hiv)

test_that("codonmat2pnps()", {
    expect_true(((hiv |> dnastring2codonmat())[,c(1, 2)] |>
    codonmat2pnps())["Codons"] == "91")
})
kullrich/MSA2dist documentation built on Nov. 14, 2024, 5:39 p.m.