tests/testthat/test_log2_FC.R

test_that("log2_FC() works faultlessly.", {
  # load pre-computed results (obtaines via `distinct_test`)
  data("res", package = "distinct")
  # load the input data:
  data("Kang_subset", package = "distinct")
  
  # We can optionally add the fold change (FC) and log2-FC between groups:
  res = log2_FC(res = res,
                x = Kang_subset, 
                name_assays_expression = "cpm",
                name_group = "stim",
                name_cluster = "cell")
  
  expect_is(res, "data.frame")
})

Try the distinct package in your browser

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

distinct documentation built on Nov. 8, 2020, 8:20 p.m.