From 7307708aff91a401c4294ed240917dfdee1dba73 Mon Sep 17 00:00:00 2001 From: Ryan Kai Le Chen Date: Fri, 26 May 2023 13:30:55 +0100 Subject: [PATCH] bug fix --- R/ukhls_clean_post_process_benefits.R | 1 + 1 file changed, 1 insertion(+) diff --git a/R/ukhls_clean_post_process_benefits.R b/R/ukhls_clean_post_process_benefits.R index 5b37a14..07b6bca 100644 --- a/R/ukhls_clean_post_process_benefits.R +++ b/R/ukhls_clean_post_process_benefits.R @@ -29,4 +29,5 @@ ukhls_post_clean_benefit <- function(data = NULL) { data[(b_income_support != "receipt" & b_ES_Allowance != "receipt" & b_incap_ben != "receipt" & b_sev_disab_allowance != "receipt") & b_UniCred == "receipt" & l_econ_stat_3cat != "inactive", econ_inactive_benefits := "non_receipt"] data[is.na(b_income_support) & is.na(b_ES_Allowance) & is.na(b_incap_ben) & is.na(b_sev_disab_allowance) & is.na(b_UniCred), econ_inactive_benefits := NA] + return(data) }