tests/testthat/test_leicase.R

context("Lei")

test_that("Lei's case works", {
  count <- matrix(rpois(100, 10), ncol = 10)
  expect_error(poisthin(count, ngene = 10, gselect = "random"), NA)
})

Try the seqgendiff package in your browser

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

seqgendiff documentation built on March 18, 2022, 5:21 p.m.