bartlett.test(Donnée_patient$score.information ~ Donnée_patient$profession )
et vola le code d'erreur qui affiche
Error in bartlett.test.default(c(22, 36, 37, 35, 29, 28, 30, 36.5, 29, :
there must be at least 2 observations in each group
shapiro.test(Donnée_patient$profession)
Error in shapiro.test(Donnée_patient$profession) :
is.numeric(x) n'est pas TRUE
> table(Donnée_patient$profession)
Agriculteur Artisan Cadre Profession intermediaire
1 41 196 111
employe ouvrier Etudiant Autre
77 44 22 42