# Generated by roxytest: do not edit by hand!
# File R/get_sig_cancer_type_index.R: @testexamples
test_that("Function get_sig_cancer_type_index() @ L28", {
l1 <- get_sig_cancer_type_index()
l2 <- get_sig_cancer_type_index(sig_type = "SBS")
l3 <- get_sig_cancer_type_index(sig_type = "DBS", source = "PCAWG", seq_type = "WGS")
l4 <- get_sig_cancer_type_index(sig_type = "ID")
l5 <- get_sig_cancer_type_index(keyword = "breast")
l1
l2
l3
l4
l5
expect_is(l1, "list")
expect_is(l2, "list")
expect_is(l3, "list")
expect_is(l4, "list")
expect_null(l5)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.