Valeur moyenne du FIM moteur à l'admission

C1_05_S(x)

Arguments

x

un tibble (voir le format de la valeur de retour deiqi.input)

Chapitre

C1-Rééducation gériatrique précoce

Groupe

C-Médecine gériatrique

Spécification

if_else( srg %in_table% (CHOP_Ger_Fruehreha) &
ddx %in_table% (ICD_FIM_motorisch),
case_when( ddx %in_range% ('U5051') ~ 21.5,
ddx %in_range% ('U5041') ~ 36.5,
ddx %in_range% ('U5031') ~ 50.5,
ddx %in_range% ('U5021') ~ 63.5,
ddx %in_range% ('U5011') ~ 76.5,
ddx %in_range% ('U5001') ~ 88.0),
as.double(NA))

Examples

if (FALSE)  p <- iqi.input(path2file) %>% C1_05_S()  # \dontrun{}