tests/testthat/test-odds.R

In nicoletadros/Odds: Functions for gambling

library(odds)

context("Conversions")

test_that("converting fractional -> decimal", {
  expect_equal(to.decimal("1/2"), 1.5)
})

test_that("converting decimal -> fractional", {
  expect_equal(to.fraction(1.5), "1/2")
})