# \dontshow{
options(gmax.processes = 2)
# }
gdb.init_examples()
intervs <- gscreen(
"sparse_track > 0.2",
gintervals(c(1, 2), 0, 10000)
)
gintervals.save("testintervs", intervs)
gintervals.load("testintervs")
gintervals.update("testintervs", intervs[intervs$chrom == "chr2", ][1:5, ], chrom = 2)
gintervals.load("testintervs")
gintervals.update("testintervs", NULL, chrom = 2)
gintervals.load("testintervs")
gintervals.rm("testintervs", force = TRUE)
Run the code above in your browser using DataLab