test(utils): get_granges_string

huishenlab · Nov 29, 2024 · bd79f58 · bd79f58
1 parent d470062
commit bd79f58
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/tests/testthat/test-granges.R b/tests/testthat/test-granges.R
@@ -0,0 +1,10 @@
+options("iscream.threads" = 1)
+
+regions <- c("chr1:1-6", "chr1:7-10", "chr1:11-14")
+gr <- GenomicRanges::GRanges(regions)
+
+test_that("Test GRanges to string", {
+  expect_equal(get_granges_string(gr), regions)
+})
+
+