tests/testthat/test-truediscoveryrate.R

test_that("truediscoveryrate is deprecated", {
    expect_snapshot({
        expect_equal(truediscoveryrate(eta = 1, chi = 1, rho = 1, M = 10, R = NULL,
            assumption = "stsl"), 1)
    })
})

Try the phylosamp package in your browser

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

phylosamp documentation built on May 31, 2023, 5:23 p.m.