tests/testthat/test-est_optimal_codons.R

test_that("works for internal data yeast_cds", {
  opres <- est_optimal_codons(count_codons(yeast_cds))
  expect_equal(sum(opres$coef > 0), 27)
})

Try the cubar package in your browser

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

cubar documentation built on April 3, 2025, 8:58 p.m.