F_Hueft_Frak_Inf_bei_HD_Sepsis_aus.RdControlla la specifica rispetto a ogni incontro in un tibble e aggiunge una colonna logica con il risultato.
F_Hueft_Frak_Inf_bei_HD_Sepsis_aus(x)un tibble (vedi il formato del valore di ritorno di read.bfs)
vero o falso
F_Hueft_Frak_Inf_bei_HD_Sepsis_aus <- function(x){ x %>%
mutate(F_Hueft_Frak_Inf_bei_HD_Sepsis_aus =
!(pdx %in_table% (ICD_Sepsis) &
sdx %in_table% (ICD_Hueft_Frak_Inf)) ) }
if (FALSE) read.bfs(path2file) %>% F_Hueft_Frak_Inf_bei_HD_Sepsis_aus() # \dontrun{}