Chapitre 9. Statistique descriptive
375
> tableaufreqtotal <- table.complète/table.complète[
+
length(table.complète)]
> tableaufreqtotal
situation
sexe
seul
couple
famille
autre
Homme 0.088495575 0.278761062 0.008849558 0.000000000
Femme 0.345132743 0.247787611 0.030973451 0.000000000
sum
0.433628319 0.526548673 0.039823009 0.000000000
situation
sexe
sum
Homme 0.376106195
Femme 0.623893805
sum
1.000000000
9.3.4.3 Distributions marginales
L’obtention des marges d’une table de distribution tableaufreq (ou d’une
table de contingence) s’obtient au moyen de la fonction margin.table().
> margin.table(tableaufreq,1) # Marge de droite.
sexe
Homme
Femme
0.3761062 0.6238938
> margin.table(tableaufreq,2) # Marge du bas.
situation
seul
couple
famille
autre
0.43362832 0.52654867 0.03982301 0.00000000
Attention
Lorsque la table de distribution (ou de contingence) est compl` ete, c’est` a-dire qu’elle contient d´ ej` a les marges (comme pour tableaufreqtotal),
il ne faut pas utiliser la fonction margin.table() pour les extraire, mais
plutˆ ot proc´ eder ainsi :
> tableaufreqtotal[,ncol(tableaufreqtotal)] # Marge de droite.
Homme
Femme
sum
0.3761062 0.6238938 1.0000000
> tableaufreqtotal[nrow(tableaufreqtotal),] # Marge du bas.
seul
couple
famille
autre
sum
0.43362832 0.52654867 0.03982301 0.00000000 1.00000000
9.3.4.4 Distributions conditionnelles
Les tableaux des distributions conditionnelles s’obtiennent au moyen de la
fonction prop.table().