From b4d1d8f1b2fd218df092c0c5b615ce03e63d0e32 Mon Sep 17 00:00:00 2001 From: DavisVaughan Date: Thu, 18 Nov 2021 13:06:04 -0500 Subject: [PATCH 1/2] Use a character `"0"` as the replacement value --- R/functions_OLD.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/functions_OLD.R b/R/functions_OLD.R index 0bedda5..1330140 100644 --- a/R/functions_OLD.R +++ b/R/functions_OLD.R @@ -428,7 +428,7 @@ gate_programmatic <- by = quo_names(.element)) %>% # Replace NAs - mutate(!!name := replace_na(!!as.symbol(name), 0)) %>% + mutate(!!name := replace_na(!!as.symbol(name), "0")) %>% # Add internals the list of gates add_attr(gate_list, "gate") From cc28c8f449ba990f5491120fe328f81ff22fb89e Mon Sep 17 00:00:00 2001 From: DavisVaughan Date: Thu, 18 Nov 2021 16:16:03 -0500 Subject: [PATCH 2/2] Adjust another usage of `0` to `"0"` --- R/functions_OLD.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/functions_OLD.R b/R/functions_OLD.R index 1330140..b3970c6 100644 --- a/R/functions_OLD.R +++ b/R/functions_OLD.R @@ -322,7 +322,7 @@ gate_interactive <- by = quo_names(.element)) %>% # Replace NAs - mutate(!!name := replace_na(!!as.symbol(name), 0)) %>% + mutate(!!name := replace_na(!!as.symbol(name), "0")) %>% # Add internals the list of gates add_attr(map(gate_list, ~ attr(.x, "gate")), "gate")