Fix select_() replacement in plot_cells.

cole-trapnell-lab · Apr 2, 2024 · 98402ed · 98402ed
1 parent 1336cc9
commit 98402ed
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: monocle3
 Title: Clustering, Differential Expression, and Trajectory Analysis for
     Single-Cell RNA-Seq
-Version: 1.3.6
+Version: 1.3.7
 Authors@R: c(
     person(given = "Hannah",
            family = "Pliner",

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,11 @@
+# Monocle3 1.3.7
+
+### Changes
+
+* Fix partition calculation when clusters are widely separated.
+* Fix possible column selection error in plot_cells().
+
+
 # Monocle3 1.3.0
 
 ### Changes

diff --git a/R/plotting.R b/R/plotting.R
@@ -280,8 +280,8 @@ plot_cells_3d <- function(cds,
 
     ica_space_df <- t(cds@principal_graph_aux[[reduction_method]]$dp_mst) %>%
       as.data.frame() %>%
-      dplyr::select(prin_graph_dim_1 = x, prin_graph_dim_2 = y,
-                     prin_graph_dim_3 = z) %>%
+      dplyr::select(prin_graph_dim_1 = {{x}}, prin_graph_dim_2 = {{y}},
+                     prin_graph_dim_3 = {{z}}) %>%
       dplyr::mutate(sample_name = rownames(.),
                     sample_state = rownames(.))
 
@@ -543,7 +543,7 @@ plot_cells <- function(cds,
 
     ica_space_df <- t(cds@principal_graph_aux[[reduction_method]]$dp_mst) %>%
       as.data.frame() %>%
-      dplyr::select(prin_graph_dim_1 = x, prin_graph_dim_2 = y) %>%
+      dplyr::select(prin_graph_dim_1 = {{x}}, prin_graph_dim_2 = {{y}}) %>%
       dplyr::mutate(sample_name = rownames(.),
                     sample_state = rownames(.))