# Splitting pcawg_sv into two sets. SetB will contain SVs to lempirical breakpoint features from for testing data.
devtools::load_all()
data(pcawg_sv)
set.seed(0)
grp_ind <- sample(1:length(pcawg_sv), size = length(pcawg_sv)/2, replace = FALSE)
pcawg_sv_setB <- pcawg_sv[-grp_ind]
save(pcawg_sv_setB, file = "../data/pcawg_sv_setB.rda")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.