F_Cholecystektomie.RdPrüft die Spezifikation gegen jeden Fall in einem tibble und fügt eine logische Spalte mit dem Ergebniss hinzu.
F_Cholecystektomie(x)ein tibble (siehe Format des Rückgabewertes von read.bfs)
wahr oder falsch
F_Cholecystektomie <- function(x){ x %>%
mutate(F_Cholecystektomie =
(pdx %in_table% (ICD_Cholecystektomie) &
srg %in_table% (CHOP_Cholecystektomie) &
ddx %not_in_table% (ICD_TUMOR) &
srg %not_in_table% (CHOP_Galle_Excl)) ) }
if (FALSE) read.bfs(path2file) %>% F_Cholecystektomie() # \dontrun{}