Merge pull request #44 from bkemper24/main

check for toVectors() returning empty list
sassoftware · Jan 10, 2023 · b09bc46 · b09bc46
2 parents 0bcbcad + 716d8dc
commit b09bc46
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/swat.R b/R/swat.R
@@ -1898,7 +1898,7 @@ cas2r <- function(sw_value) {
       }, silent = TRUE)
 
       # Use vectors if it exists, it will be much faster
-      if ( !is.null(vectors) ) {
+      if ( !is.null(vectors) && length(vectors) > 0 ) {
          col.names <- c()
          col.transformers <- list()
          for (col in 0 : (nCols - 1)) {