tests/testthat/test-misc.R

# Test funcs. in misc.R

test_that("simulateDataset gives expected output", {
    expect_equal(nrow(simulateDataset(n_genes = 30)), 30)
    expect_equal(nlevels(simulateDataset(n_rings = 4)$cluster), 4)
})
prabhakarlab/Banksy documentation built on July 31, 2024, 7:37 p.m.