tests/testthat/test-plot_hexbin_feature_shiny.R

test_that("correct plot_hexbin_feature_shiny Seurat", {
  expect_equal(class(plot_hexbin_feature_shiny(pbmc_small, 
        type="counts", feature="TALDO1", 
        action="prop_0", min_nbins=2, max_nbins=10, dimension_reduction="PCA",
        mod="RNA")), "shiny.appobj")
})

test_that("correct plot_hexbin_feature_shiny SingleCellExperiment", {
  pbmc_small <- as.SingleCellExperiment(pbmc_small)
  expect_equal(class(plot_hexbin_feature_shiny(pbmc_small, 
      type="counts", feature="TALDO1", 
      action="prop_0", min_nbins=2, max_nbins=10, dimension_reduction="PCA",
      mod="RNA")), "shiny.appobj")
})

Try the schex package in your browser

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

schex documentation built on Nov. 8, 2020, 5:56 p.m.