read_patients() and friends read
CSV output files from FACTS and return special aggregated data frames.
overwite_csv_files() accepts such an aggregated data frame
and writes the content to the original CSV files it came from.
overwrite_csv_files(x)An aggregated data frame from read_patients()
or similar function.
Nothing.
facts_file <- get_facts_file_example("contin.facts")
# Can only run if system dependencies are configured:
if (file.exists(Sys.getenv("RFACTS_PATHS"))) {
out <- run_facts(facts_file, n_sims = 2)
pats <- read_patients(out)
head(pats$visit_1)
pats$visit_1 <- 0
overwrite_csv_files(pats)
pats2 <- read_patients(out)
head(pats2$visit_1)
}