Considérons le tableau de contingence suivant
> N=margin.table(HairEyeColor, c(1,2)) > N Eye Hair Brown Blue Hazel Green Black 68 20 15 5 Brown 119 84 54 29 Red 26 17 14 14 Blond 7 94 10 16
avec ici les comptages, que l’on peut aussi traduire sous la forme de probabilités jointes (empiriques)
> N/n
Eye
Hair Brown Blue Hazel Green
Black 0.115 0.034 0.025 0.008
Brown 0.201 0.142 0.091 0.049
Red 0.044 0.029 0.024 0.024
Blond 0.012 0.159 0.017 0.027