Source specific container script.
It is probably not worth the effort of making this general.labels
parent
da5ff0f36e
commit
04ad2d0b81
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue