J1_14_P.RdCasi con ARDS in caso di resezione del polmone, percentuale
J1_14_P(x)un tibble (vedi il formato del valore di ritorno di read.bfs)
56_43
J1-Ventilazione assistita, ARDS e procedure extracorporee
J-Quadri clinici complessi, eterogenei (tracer per revisione tra pari)
percentuale
J1_14_P <- function(x){ x %>%
mutate( i = if_else((srg %in_table% (CHOP_Thoraxchirurgische_Eingriffe)),
if_else((ddx %in_table% (ICD_COVID19_ARDS)), 2, 1), as.double(NA))) %>%
output_table_perc('J1_14_P') }
if (FALSE) read.bfs(path2file) %>% iqi.functions() %>% J1_14_P() # \dontrun{}