===P1B===
Mon Oct  5 10:57:08 PM CDT 2026
---RHIST_PATTERNS---
== BCRM ==
7:a("bcrm",href="https://cran.r-project.org/web/packages/bcrm/bcrm.pdf"), "package and was built using",
== CFF ==
== EPTBC ==
== NAC_Prediction ==
== NCI_Publication_Reporting_Assistant ==
91:library(odbc)
93:con <- DBI::dbConnect(odbc::odbc(),
115:library(odbc)
117:con <- DBI::dbConnect(odbc::odbc(),
136:library(odbc)
138:con <- DBI::dbConnect(odbc::odbc(),
163:library(odbc)
165:con <- DBI::dbConnect(odbc::odbc(),
191:library(odbc)
193:con <- DBI::dbConnect(odbc::odbc(),
221:library(odbc)
224:con <- DBI::dbConnect(odbc::odbc(),
== Neurology_Estimate_VO2 ==
== Neurology_Estimate_Watts ==
== PROpwrAppCode ==
== SCORTEN_SJSTEN_Survival ==
---EPOC_REDCAP---
21:#token <- "F5F7BC3D781994F8F45C14D5785087BD"
24:  epoc <- redcap_read(redcap_uri = "https://redcap.kumc.edu/api/", token = token, export_data_access_groups = T)$data
27:url <- "https://redcap.kumc.edu/api/"
28:formData <- list("token"=token,
158:  filter(redcap_event_name == "baseline_arm_1") %>% 
159:  select(studyid, redcap_data_access_group, visitdat, age, sex, race, ethnic, adpkd_status, mhhtn, 
165:  filter(redcap_event_name=="onetime_forms_and_arm_1") %>% 
671:         input$site == "KUMC" ~ is.na(redcap_data_access_group),
672:         input$site == "CMH" ~ redcap_data_access_group == "childrens_mercy",
673:         input$site == "Chicago" ~ redcap_data_access_group == "chicago",
674:         TRUE ~ is.na(redcap_data_access_group)|!is.na(redcap_data_access_group)
---KEYRING_APPS---
/srv/shiny-server/16SguildDB/app.R
===ENDP1B===