tests/testthat/test_irregular-functions.R

context(".irregular")

test_that(".irregularScore", {
  expect_equal(MALDIquant:::.irregularScore(1:10), 0)
  expect_equal(MALDIquant:::.irregularScore((1:10)[-8]), 1/7)
})

Try the MALDIquant package in your browser

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

MALDIquant documentation built on Sept. 11, 2024, 6:15 p.m.