tests/testthat/testmedian.R

test_that("median value is correct",{
  expect_equal(mediantest(c(1,3),c(5,-1),paired=TRUE)$statistic,0)
  expect_equal(mediantest(c(1,3))$estimate,2)
})
obouaziz/robusTest0 documentation built on Dec. 22, 2021, 4:13 a.m.