F_ICU.RdPrüft die Spezifikation gegen jeden Fall in einem tibble und fügt eine logische Spalte mit dem Ergebniss hinzu.
F_ICU(x)ein tibble (siehe Format des Rückgabewertes von read.bfs)
wahr oder falsch
F_ICU <- function(x){ x %>%
mutate(F_ICU =
(hmv>0 |
losicu>0 |
srg %in_table% (CHOP_ICU)) ) }
if (FALSE) read.bfs(path2file) %>% F_ICU() # \dontrun{}