diff --git a/src/data/translate_usernames_into_participants_data.R b/src/data/translate_usernames_into_participants_data.R index 01e8e2d3..dab89f94 100644 --- a/src/data/translate_usernames_into_participants_data.R +++ b/src/data/translate_usernames_into_participants_data.R @@ -1,4 +1,5 @@ source("renv/activate.R") +source("src/data/streams/aware_postgresql/container.R") library(RPostgres) library(magrittr) @@ -23,7 +24,7 @@ prepare_participants_file <- function() { participant_data <- read_csv(username_list_csv_location, col_types = "c", progress = FALSE) usernames <- participant_data$label - participant_ids <- pull_participants_ids("whatever", usernames, participants_container) + participant_ids <- pull_participants_ids(data_configuration, usernames, participants_container) participant_data %<>% left_join(participant_ids, by = c("label" = "username")) %>% rename(participant_id = id)