From 6610233f856b462a7a308adfe4c809211bf408b4 Mon Sep 17 00:00:00 2001 From: Preston Burns Date: Mon, 10 Jun 2024 20:17:43 +0000 Subject: [PATCH] update standalone app example to reflect changes --- inst/examples/standalone_app.R | 19 +++++++++++-------- 1 file changed, 11 insertions(+), 8 deletions(-) diff --git a/inst/examples/standalone_app.R b/inst/examples/standalone_app.R index be7cf0b..d70eab4 100644 --- a/inst/examples/standalone_app.R +++ b/inst/examples/standalone_app.R @@ -10,18 +10,18 @@ if (!interactive()) { } new_mapping <- list(labs = list("id_col" = "USUBJID", "measure_col" = "TEST", - "measure_values" = list("CREAT" = "Creatinine", + "measure_values" = list("CREAT" = "Creatinine", #specified measures "CYSTC" = "Cystatin C", "eGFR" = "eGFR", "eGFRcys" = "eGFRcys", "ALB/CREAT" = "Albumin/Creatinine", - "BICARB" = "Bicarbonate", - "BUN" = "Blood Urea Nitrogen", - "CA" = "Calcium", - "CL" = "Chloride", - "PHOS" = "Phosphorus", - "K" = "Potassium", - "SODIUM" = "Sodium" + "nepFC_BICARB" = "Bicarbonate", #foldchange measures + "nepFC_BUN" = "Blood Urea Nitrogen", + "nepFC_CA" = "Calcium", + "nepFC_CL" = "Chloride", + "nepFC_PHOS" = "Phosphorus", + "nepFC_K" = "Potassium", + "nepFC_SODIUM" = "Sodium" ), "value_col" = "STRESN", "unit_col" = "STRESU", @@ -45,6 +45,9 @@ vitals = list("id_col" = "USUBJID", "treatment_col" = "ARM", "measure_col" = "TE "vs_baseline_flag" = "BLFL", "visit_col" = "VISIT", "visitn_col" = "VISITN", + "studyday_col" = "DY", + "value_col" = "STRESN", + "unit_col" = "STRESU", "measure_values" = list("DIABP" = "Diastolic Blood Pressure", "SYSBP" = "Systolic Blood Pressure") )