quickSOFA | R Documentation |
Compute the quickSOFA score.
quickSOFA(FRM_RR, FRM_B24, FRM_BEF, DID_CLIN, zp_fabian = "auf_in_d0")
FRM_RR |
data.table containing the table with the same name from the database of the PROGRESS study |
FRM_B24 |
data.table containing the table with the same name from the database of the PROGRESS study |
FRM_BEF |
data.table containing the table with the same name from the database of the PROGRESS study |
DID_CLIN |
data.table containing the table with the same name from the database of the PROGRESS study |
zp_fabian |
vector of characters. They must be present in event2zeitpunkt_table$zp_fabianref. Currently, only zp_fabian = "auf_in_d0" is possible. |
a named list with components: input and out. input is a data.table in the wide format (one row per patient), containing the data used for computing the quickSOFA score. out is a data.table with one row corresponding to one patient, identified by the PATSTUID. The column qSOFA contains the value of quickSOFA. The score is non-NA, if more than 50
## Not run:
excel_fn <- paste0("/net/ifs1/san_projekte/projekte/",
"PROGRESS/Datenmanagement/Data_freezes/",
"20190320/PROGRESS-freeze_201903_01.xlsx")
FRM_RR <- readxl::read_excel(excel_fn, 'FRM_RR')
FRM_B24 <- readxl::read_excel(excel_fn, 'FRM_B24')
FRM_BEF <- readxl::read_excel(excel_fn, 'FRM_BEF')
DID_CLIN <- readxl::read_excel(excel_fn, 'DID_CLIN')
data.table::setDT(FRM_RR)
data.table::setDT(FRM_B24)
data.table::setDT(FRM_BEF)
data.table::setDT(DID_CLIN)
erg_d0 <- quickSOFA(FRM_RR, FRM_B24, FRM_BEF,
DID_CLIN, zp_fabian = "auf_in_d0")
erg_d0
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.