Change filtering of Finished and remove subject that was not in wave 1 from data

2025-12-10 16:18:06 +01:00
parent 00ae79b876
commit bbdb35559c
8 changed files with 4329 additions and 4324 deletions
@@ -13,7 +13,7 @@ anonymize_wave <- function(data, wave, sample = "sample1") {

  df <- data |>
    dplyr::filter(Status != 1) |>             # exclude Status not "Survey Preview"
-    dplyr::filter(Finished != 0) |>           # exclude survey not finished
+    #dplyr::filter(Finished != 0) |>           # exclude survey not finished
    dplyr::filter(informed_consent == 1) |>   # exclude did not give consent
    dplyr::filter(truth_answer_check == 1) |> # exclude did not provide honest answers
    dplyr::filter(consent_use_of_data == 1)   # exclude did not consent to data use