fix test dim values for rgstack file

Bioconductor · Dec 12, 2018 · 3aa9027 · 3aa9027
1 parent 55e61c2
commit 3aa9027
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: VCFArray
 Title: Representing on-disk / remote VCF files as array-like objects
-Version: 0.99.17
+Version: 0.99.18
 Authors@R: c(
     person("Qian", "Liu", email = "[email protected]", role = c("aut", "cre")),	
     person("Martin", "Morgan", role = "aut"))	       

diff --git a/tests/testthat/test_VCFArray.R b/tests/testthat/test_VCFArray.R
@@ -69,22 +69,22 @@ test_that("VCFArraySeed and VCFArray constructor works", {
 
     ## geno()
     seed <- VCFArraySeed(rgstack, name = "GT")
-    expect_identical(dim(seed), c(505L, 3L))
+    expect_identical(dim(seed), c(318L, 3L))
 
     ## fixed()
     seed <- VCFArraySeed(rgstack, name = "FILTER")
-    expect_identical(dim(seed), 505L)
+    expect_identical(dim(seed), 318L)
     va <- VCFArray(seed)
     expect_s4_class(va, "VCFArray")
 
     ## info()
     seed <- VCFArraySeed(rgstack, name = "set")
-    expect_identical(dim(seed), 505L)
+    expect_identical(dim(seed), 318L)
 
     ## 3-dim array
     seed <- VCFArraySeed(rgstack, name = "SB")
     va <- VCFArray(seed)
-    expect_identical(dim(va), c(505L, 3L, 4L))
+    expect_identical(dim(va), c(318L, 3L, 4L))
     expect_s4_class(va, "VCFArray")
 
     va1 <- VCFArray(rgstack, name = "SB")