# Load copy number object
load(system.file("extdata", "toy_copynumber.RData",
package = "sigminer", mustWork = TRUE
))
p <- show_cn_profile(cn, nrow = 2, ncol = 1)
p
# \donttest{
p2 <- show_cn_profile(cn,
nrow = 2, ncol = 1,
position = "chr1:3218923-116319008"
)
p2
# }
Run the code above in your browser using DataLab