J1_13_P.RdCasi con ARDS in caso di OP importante o trasfusione di CE o CT > 4, percentuale
J1_13_P(x)un tibble (vedi il formato del valore di ritorno di read.bfs)
56_42
J1-Ventilazione assistita, ARDS e procedure extracorporee
J-Quadri clinici complessi, eterogenei (tracer per revisione tra pari)
percentuale
J1_13_P <- function(x){ x %>%
mutate( i = if_else((srg %in_table% (CHOP_Thoraxchirurgische_Eingriffe %+%
CHOP_Herz_OP_offen %+%
CHOP_Oesophagus %+%
CHOP_Kolonresektion_erweitert_total %+%
CHOP_Pankreasresektion %+%
CHOP_anatomische_Leberresektion %+%
CHOP_grosse_Leberresektion %+%
CHOP_Massentransfusion_EK_TK)),
if_else((ddx %in_table% (ICD_COVID19_ARDS)), 2, 1), as.double(NA))) %>%
output_table_perc('J1_13_P') }
if (FALSE) read.bfs(path2file) %>% iqi.functions() %>% J1_13_P() # \dontrun{}