# Étude d'une variable discrète : nombre d'enfants par famille (100 familles)
nbenf <- c(1, 4, 4, 3, 1, 5, 2, 3, 2, 2, 2, 3, 2, 6, 4, 1, 3, 1, 6,
2, 1, 4, 1, 1, 6, 4, 1, 5, 5, 1, 3, 3, 7, 2, 4, 3, 2, 3, 3, 5, 2, 3, 6,
4, 4, 3, 2, 2, 1, 5, 3, 6, 2, 0, 5, 1, 7, 4, 3, 5, 4, 3, 6, 5, 2, 7, 7,
3, 3, 1, 2, 0, 2, 3, 5, 3, 3, 7, 6, 7, 2, 3, 1, 3, 3, 3, 5, 3, 2, 5, 6,
4, 1, 0, 2, 6, 5, 1, 0, 1)
nbenf
length(nbenf) # taille de l'échantillon
mode(nbenf) # type des données
unique(nbenf) # valeurs distinctes