force output from filterData()

Kss2k · Sep 30, 2024 · f088758 · f088758
1 parent 07bb69a
commit f088758
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/utils_da.R b/R/utils_da.R
@@ -88,6 +88,7 @@ anyAllNA <- function(data) {
 
 
 castDataNumericMatrix <- function(data) {
+  force(data) # evaluate to check for errors
   data <- tryCatch({
     numericData <- lapplyDf(data, FUN = as.numeric)
   },