From 5d4731d4b59ea84fa303606920754288f53349b6 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Romain=20Fran=C3=A7ois?= Date: Thu, 20 Dec 2018 13:03:31 +0100 Subject: [PATCH] Update xplot_helpers.R use `select_at()` instead of `select()`. related to https://github.com/UUPharmacometrics/xpose/issues/125 --- R/xplot_helpers.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/xplot_helpers.R b/R/xplot_helpers.R index 5079311f..07cfc46b 100644 --- a/R/xplot_helpers.R +++ b/R/xplot_helpers.R @@ -321,7 +321,7 @@ drop_fixed_cols <- function(xpdb, .problem, cols, quiet) { # Get the column names to be removed cols_rm <- get_data(xpdb, .problem = .problem) %>% - dplyr::select_(.dots = cols) %>% + dplyr::select_at(cols) %>% dplyr::select_if(.predicate = function(x) length(unique(x)) == 1) %>% colnames() if (length(cols_rm) == 0) return(cols)