bug fix: check for data.frame removed from fd_report.

ropensci · Oct 18, 2024 · 941915f · 941915f
1 parent d094551
commit 941915f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/fd_report.R b/R/fd_report.R
@@ -106,7 +106,7 @@ fd_report <- function(x,
 
         if (sw_data %in% sw_data_overview()) {
                 sw_data <- rep(sw_data, nrow(x))
-        } else if (exists(sw_data) & is.data.frame(sw_data)){
+        } else if (exists(sw_data)){
                 sw_data <- rep(sw_data, nrow(x))
         } else if (sw_data %in% colnames(x)) {
                 sw_data <- x[, sw_data]