I should fix create at some point...
authorPaul Hoffman <phoffman@nygenome.org>
Wed, 13 Dec 2017 19:35:24 +0000 (14:35 -0500)
committerPaul Hoffman <phoffman@nygenome.org>
Wed, 13 Dec 2017 19:35:24 +0000 (14:35 -0500)
R/loom.R

index 680d868fed69e51da38e6f261703bb934695e959..b12e9b9555c43f59eac987466e9a1be929a538a1 100644 (file)
--- a/R/loom.R
+++ b/R/loom.R
@@ -1001,7 +1001,8 @@ subset.loom <- function(
   # Make the loom file
   new.loom <- create(
     filename = filename,
-    data = t(x = x[['matrix']][n, m]),
+    # data = t(x = x[['matrix']][n, m]),
+    data = x[['matrix']][n, m],
     overwrite = overwrite
   )
   # Add row attributes