tests/testthat/test-check_outliers.R

test_that("Default check_outliers", {
  expect_s3_class(check_outliers(GSE74821), "nacho")
})

test_that("missing object", {
  expect_error(check_outliers())
})

test_that("wrong attribute", {
  attr(GSE74821, "RCC_type") <- "something_wrong"
  expect_error(check_outliers(GSE74821))
})

Try the NACHO package in your browser

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

NACHO documentation built on Dec. 6, 2022, 1:06 a.m.