tests/testthat/test-roxytest-testexamples-show_sig_feature_corrplot.R

In ShixiangWang/sigminer: Extract, Analyze and Visualize Mutational Signatures for Genomic Variations

# Generated by roxytest: do not edit by hand!

# File R/show_sig_feature_corrplot.R: @testexamples

test_that("Function show_sig_feature_corrplot() @ L45", {
  
  
  # The data is generated from Wang, Shixiang et al.
  load(system.file("extdata", "asso_data.RData",
    package = "sigminer", mustWork = TRUE
  ))
  
  p <- show_sig_feature_corrplot(
              tidy_data.seqz.feature,
              p_val = 0.05,
              breaks_count = c(0L,200L, 400L, 600L, 800L, 1020L))
  p
  
  expect_s3_class(p, "ggplot")
})