tests/testthat/test_deprecated_mf_trapezoidal_sup.R

context("Deprecated mf_trapezoidal_sup")

test_that("Deprecated mf trapezoidal sup degrees", {
  expect_warning(mf <- new(mf_trapezoidal_sup, 0, 1), "deprecated")

  expect_equal(mf$degree(0), 0)
  expect_equal(mf$degree(0.5), 0.5)
  expect_equal(mf$degree(1), 1)
})

Try the FisPro package in your browser

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

FisPro documentation built on March 31, 2023, 7:22 p.m.