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