tests/testthat/test-logit.prob.R

context("logit.prob")

test_that("logit.prob outputs correctly", {
    odds <- 1
    logit <- log(odds)
    expect_true(logit.prob(logit) == 0.5)
}) 
jumpingrivers/optiRum documentation built on March 6, 2024, 7:27 p.m.