Vous devez stocker le résultat de votre appel à la fonction chisq.test()
dans une nouvelle variable car la fonction chisq.test()
ne stocke pas ces valeurs dans le data frame passé en paramètre :
chitesting <- data.frame(TQ=c(22,5,9,10,24,11,4,6,9), P=c(14,2,2,16,3,46,3,2,12))
chi_result <- chisq.test(chitesting)
print("chi_result:")
print(chi_result)
print("chi_result$observed:")
print(chi_result$observed)
print("chi_result$expected:")
print(chi_result$expected)
Sortie :
Message d'avertissement:
In chisq.test(chitesting) : L'approximation du chi-carré peut être incorrecte
[1] "chi_result:"
Test du Chi-carré de Pearson
data: chitesting
X-squared = 49.299, df = 8, p-value = 5.572e-08
[1] "chi_result$observed:"
TQ P
[1,] 22 14
[2,] 5 2
[3,] 9 2
[4,] 10 16
[5,] 24 3
[6,] 11 46
[7,] 4 3
[8,] 6 2
[9,] 9 12
[1] "chi_result$expected:"
TQ P
[1,] 18.0 18.0
[2,] 3.5 3.5
[3,] 5.5 5.5
[4,] 13.0 13.0
[5,] 13.5 13.5
[6,] 28.5 28.5
[7,] 3.5 3.5
[8,] 4.0 4.0
[9,] 10.5 10.5