remaining issue is in {bigmemory}, not {bigstatsr}

privefl · Sep 9, 2024 · 5800d2a · 5800d2a
1 parent e7697d8
commit 5800d2a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-bigmemory.R b/tests/testthat/test-bigmemory.R
@@ -11,14 +11,14 @@ test_that("Conversion to big.matrix works", {
   for (t in c("raw", "integer", "float", "double")) {
 
     X <- FBM(10, 10, type = t, init = 0)
-    if (t != "raw") X[1] <- NA
+    if (t != "raw") X[1, 1] <- NA
 
     # Conversion works
     expect_s4_class(X$bm.desc(), "big.matrix.descriptor")
     expect_s4_class(X2 <- X$bm(), "big.matrix")
     expect_identical(typeof(X2), typeof(X))
     if (t != "float" && not_cran)
-      expect_equal(as.numeric(X2[1]), as.numeric(X[1]))
+      expect_equal(as.numeric(X2[1, 1]), as.numeric(X[1, 1]))
 
     # Permissions
     X$is_read_only <- TRUE