1. Tester, chez les individus blonds, si la proportion de garçons est égale à 50 %
binom.test(x=592,n=1136,p=0.5,alternative="two.sided")
Exact binomial test
data: 592 and 1136
number of successes = 592, number of trials = 1136, p-value = 0.1631
alternative hypothesis: true probability of success is not equal to 0.5
95 percent confidence interval:
0.4916142 0.5505297
sample estimates:
probability of success
0.5211268
2. Tester l’égalité des proportions de filles pour les différentes couleurs de cheveux
prop.test(c(544,97,677,451,14),n=c(1136,216,1526,955,50))
5-sample test for equality of proportions without continuity correction
data: c(544, 97, 677, 451, 14) out of c(1136, 216, 1526, 955, 50)
X-squared = 10.467, df = 4, p-value = 0.03325
alternative hypothesis: two.sided
sample estimates:
prop 1 prop 2 prop 3 prop 4 prop 5
0.4788732 0.4490741 0.4436435 0.4722513 0.2800000
LS0tDQp0aXRsZTogIlRlc3RzIHN1ciBsZXMgcHJvcG9ydGlvbnMiDQphdXRob3I6ICJIdXNzb24gZXQgYWwuIg0KZGF0ZTogIjA1LzA5LzIwMTgiDQpvdXRwdXQ6DQogIGh0bWxfbm90ZWJvb2s6DQogICAgdG9jOiB5ZXMNCiAgICB0b2NfZGVwdGg6IDMNCiAgICB0b2NfZmxvYXQ6IHllcw0KICBodG1sX2RvY3VtZW50Og0KICAgIHRvYzogeWVzDQogICAgdG9jX2RlcHRoOiAnMycNCiAgICB0b2NfZmxvYXQ6IHllcw0KLS0tDQoNCiMgMS4gVGVzdGVyLCBjaGV6IGxlcyBpbmRpdmlkdXMgYmxvbmRzLCBzaSBsYSBwcm9wb3J0aW9uIGRlIGdhcsOnb25zIGVzdCDDqWdhbGUgw6AgNTAgJQ0KDQpgYGB7cn0NCmJpbm9tLnRlc3QoeD01OTIsbj0xMTM2LHA9MC41LGFsdGVybmF0aXZlPSJ0d28uc2lkZWQiKQ0KYGBgDQoNCiMgMi4gVGVzdGVyIGzigJnDqWdhbGl0w6kgZGVzIHByb3BvcnRpb25zIGRlIGZpbGxlcyBwb3VyIGxlcyBkaWZmw6lyZW50ZXMgY291bGV1cnMgZGUgY2hldmV1eA0KDQpgYGB7cixmaWcud2lkdGg9NCxmaWcuaGVpZ2h0PTR9DQpwcm9wLnRlc3QoYyg1NDQsOTcsNjc3LDQ1MSwxNCksbj1jKDExMzYsMjE2LDE1MjYsOTU1LDUwKSkNCmBgYA0KDQo=