diff --git a/README.md b/README.md index ec3e040b8dc6927db65824ba8b9408ced545b3ff..743be82faf6a50e3908997a659411d15388768da 100644 --- a/README.md +++ b/README.md @@ -44,9 +44,7 @@ digi_part_dat <- max_tn <- 195000, chunk_size <- 30000, attributes = c( - "token", "emailstatus", - "language", "validfrom", "validuntil", "invited", @@ -56,12 +54,10 @@ digi_part_dat <- "usesleft" ) ) %>% - select(ZN = "token", + rename(ZN = "token", part = "participant_info") %>% bind_cols(.$part) %>% select(-part) %>% - set_names(c("ZN", "Vorname", "Nachname", "Email")) %>% - filter(grepl("^[A-Za-z0-9]{15}$", ZN)) %>% distinct() ``` \ No newline at end of file