# \donttest{
if (requireNamespace("UCSCXenaTools")) {
library(UCSCXenaTools)
options(use_hiplot = TRUE)
example_file <- XenaGenerate(subset = XenaDatasets == "mc3/ACC_mc3.txt") %>%
XenaQuery() %>%
XenaDownload()
x <- read_xena_variants(example_file$destfiles)
x@data
y <- sig_tally(x)
y
}
# }
Run the code above in your browser using DataLab