From 333c61f60b4a4ce4220c74ac05d0ac66e0ff53e5 Mon Sep 17 00:00:00 2001 From: Jacob Wagner Date: Thu, 29 Oct 2020 15:37:14 -0700 Subject: [PATCH] #73: Patch issue in stat_position for booleanFilter --- R/stat_position.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/stat_position.R b/R/stat_position.R index 8aa55e7..8e66032 100644 --- a/R/stat_position.R +++ b/R/stat_position.R @@ -126,11 +126,11 @@ stat_position <- function(gate, ...)UseMethod("stat_position") }else if(location == "data"){ gate_range <- data_range }else if(location == "plot"){ - gate_range <- limits[,params] + gate_range <- limits[,colnames(data_range)] } if(location == "fixed"){ - centroids <- setNames(adjust, params) + centroids <- setNames(adjust, colnames(data_range)) }else{ #calculate centroid centroids <- colMeans(gate_range)