Update OmicSelector_create_formula.R

kstawiski · Apr 5, 2024 · a2058d6 · a2058d6
1 parent 3839f46
commit a2058d6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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 = " + ")))
 }