From a2058d6a04843778fe48f94847a4d475de34deb2 Mon Sep 17 00:00:00 2001 From: Konrad Stawiski MD PhD Date: Fri, 5 Apr 2024 15:42:49 +0200 Subject: [PATCH] Update OmicSelector_create_formula.R --- R/OmicSelector_create_formula.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/OmicSelector_create_formula.R b/R/OmicSelector_create_formula.R index 1c8863a6..aeadbdca 100644 --- a/R/OmicSelector_create_formula.R +++ b/R/OmicSelector_create_formula.R @@ -7,7 +7,7 @@ #' #' @export OmicSelector_create_formula = function(selected_features) { - if(selected_features == "." || length(selected_features) ==0 ) { stop("Too few features selected.") } + if(selected_features[1] == "." || length(selected_features) ==0 ) { stop("Too few features selected.") } selected_features<-selected_features[!is.na(selected_features)] as.formula(paste0("Class ~ ",paste0(as.character(selected_features), collapse = " + "))) }