switch direction of wave logic for filtering exp treatment var

nmdefries · nmdefries · commit b47b0ee9eb2e · 2022-01-06T12:42:15.000-05:00
diff --git a/facebook/qsf-tools/generate-codebook.R b/facebook/qsf-tools/generate-codebook.R
@@ -399,7 +399,7 @@ add_static_fields <- function(codebook,
   codebook <- bind_rows(codebook, static_fields) %>% 
     filter(!(variable == "module" & wave < 11), # module field is only available for wave >= 11
            !(variable %in% c("wave", "UserLanguage", "fips") & wave < 4), # wave, UserLangauge, and fips fields are only available for wave >= 4
-           !(variable == "w12_treatment" & wave == 12.5), # experimental arm field is only available for wave == 12.5
+           !(variable == "w12_treatment" & wave != 12.5), # experimental arm field is only available for wave == 12.5
            variable != "Random_Number"
     )
 

Original file line number	Diff line number	Diff line change
`@@ -399,7 +399,7 @@ add_static_fields <- function(codebook,`
`399`	`399`	`codebook <- bind_rows(codebook, static_fields) %>%`
`400`	`400`	`filter(!(variable == "module" & wave < 11), # module field is only available for wave >= 11`
`401`	`401`	`!(variable %in% c("wave", "UserLanguage", "fips") & wave < 4), # wave, UserLangauge, and fips fields are only available for wave >= 4`
`402`		`- !(variable == "w12_treatment" & wave == 12.5), # experimental arm field is only available for wave == 12.5`
	`402`	`+ !(variable == "w12_treatment" & wave != 12.5), # experimental arm field is only available for wave == 12.5`
`403`	`403`	`variable != "Random_Number"`
`404`	`404`	`)`
`405`	`405`