tests/testthat/test-utils.R

test_that("bvalue() works", {
  actual <- round(bvalue(small_delta = 13, big_delta = 22, G = 0.040), 3)
  expected <- 0.342
  expect_equal(actual, expected)
})

Try the midi package in your browser

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

midi documentation built on July 6, 2026, 1:08 a.m.