Browse code

a couple of leftovers from recent renamings

Hervé Pagès authored on 27/09/2020 01:34:11
Showing2 changed files

... ...
@@ -89,7 +89,7 @@
89 89
 
90 90
         # Construct ArrayGrid --------------------------------------------------
91 91
 
92
-        sink_grid <- colGrid(x = sink, ncol = 1L)
92
+        sink_grid <- colAutoGrid(x = sink, ncol = 1L)
93 93
         list_of_cols <- split(seq_along(group), group)[ugroup]
94 94
 
95 95
         # Compute colsum() -----------------------------------------------------
... ...
@@ -174,7 +174,7 @@
174 174
 
175 175
         # Construct ArrayGrid --------------------------------------------------
176 176
 
177
-        sink_grid <- rowGrid(x = sink, nrow = 1L)
177
+        sink_grid <- rowAutoGrid(x = sink, nrow = 1L)
178 178
         list_of_rows <- split(seq_along(group), group)[as.character(ugroup)]
179 179
 
180 180
         # Compute colsum() -----------------------------------------------------
... ...
@@ -63,7 +63,7 @@
63 63
     on.exit(close(sink))
64 64
 
65 65
     # Set up ArrayGrid instance over columns of `sink`.
66
-    sink_grid <- colGrid(sink)
66
+    sink_grid <- colAutoGrid(sink)
67 67
 
68 68
     # Loop over column grid of 'sink', identify samples required for that
69 69
     # block, bring that data into memory, pass down to .combineList_matrix(),