Fixes error on NA by NA

Closes #108
NIFU-NO · Aug 24, 2024 · fdf6271 · fdf6271
1 parent 9b2ed3d
commit fdf6271
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/summarize_cat_cat_data.R b/R/summarize_cat_cat_data.R
@@ -3,9 +3,11 @@
 # Helper function to create overarching factor variable for the response categories column
 category_var_as_fct <-
   function(data_summary, fct_unions) {
+
     data_summary$.category <- factor(x = data_summary$.category,
                                      levels = fct_unions,
-                                     labels = fct_unions)
+                                     labels = fct_unions,
+                                     exclude = NULL)
     data_summary
   }