drop else since vaccine_barriers already named

nmdefries · nmdefries · commit 69b8971be7b4 · 2021-12-19T16:22:32.000-06:00
diff --git a/facebook/delphiFacebook/R/variables.R b/facebook/delphiFacebook/R/variables.R
@@ -793,8 +793,6 @@ code_vaccines <- function(input_data, wave) {
     )
     if (any(!is.na(vaccine_barriers))) {
       vaccine_barriers <- split_options(vaccine_barriers)
-    } else {
-      vaccine_barriers <- input_data$V15b
     }
 
     input_data$v_vaccine_barrier_eligible_tried <- is_selected(vaccine_barriers, "1")

Original file line number	Diff line number	Diff line change
`@@ -793,8 +793,6 @@ code_vaccines <- function(input_data, wave) {`
`793`	`793`	`)`
`794`	`794`	`if (any(!is.na(vaccine_barriers))) {`
`795`	`795`	`vaccine_barriers <- split_options(vaccine_barriers)`
`796`		`- } else {`
`797`		`- vaccine_barriers <- input_data$V15b`
`798`	`796`	`}`
`799`	`797`
`800`	`798`	`input_data$v_vaccine_barrier_eligible_tried <- is_selected(vaccine_barriers, "1")`