F3_07_F.Rd
OP des artères du bassin/des jambes en cas d'anévrisme/de dissection
F3_07_F(x)
un tibble
(voir le format de la valeur de retour de read.bfs)
28_16_N
F3-Opérations des artères du bassin et des jambes
F-Affections des vaisseaux
nombre de cas
F3_07_F <- function(x){ x %>%
mutate( i = if_else((srg %in_table% (CHOP_Becken_Bein_OP) &
ddx %in_table% (ICD_Dissektion) &
ddx %not_in_table% (ICD_Embolie %+%
ICD_Prothesen_Implantate) &
srg %not_in_table% (CHOP_Amput_Bein %+%
CHOP_Amput_Fuss) &
srg %not_in_table% (CHOP_Organ_Tx_alle) &
F_Aorta_exclusion),
if_else((F_Tot), 2, 1), as.double(NA))) %>%
output_table_cnt('F3_07_F') }
if (FALSE) read.bfs(path2file) %>% iqi.functions() %>% F3_07_F() # \dontrun{}