salut,
le test de comparaison de 2 proportions (apres la terminale) se realise
comme l'indique le programme suivant:
/******************************************************************
******** Test bilatéral de comparaison de deux proportions ********
******************************************************************/
Comparer2proportions(n1,x1,n2,x2,alpha):={
//n1 (n2):taille de l'échantillon 1 (2),
//x1 (x2):nombre d'individus présentant le caractère dans l'échantillon 1 (2)
//H0:p1 est égal à p2,H1:p1 est différent de p2
//alpha:risque
local Uobs,Uth,p;
si n1<30 ou n2<30 alors
afficher("Attention l'un au moins des deux échantillons a une taille inférieure à 30");
fsi
si x1<5 ou x2<5 ou n1-x1<5 ou n2-x2<5 alors
afficher("Attention l'un au moins des 4 effectifs est inférieur à 5")
fsi
p:=(x1+x2)/(n1+n2);
Uobs:=evalf(abs(x1/n1-x2/n2)/sqrt(p*(1-p)*(1/n1+1/n2)));
Uth:=normal_icdf(1-alpha/2);
afficher("Uobs="+Uobs+" et Uth="+Uth);
si Uobs>Uth alors
afficher("Au risque "+(alpha)+" on rejette l'hypothèse H0");
retourne 0
sinon
afficher("Au risque "+(alpha)+" on ne rejette pas l'hypothèse H0");
retourne 1
fsi
}
:;
Pour un test au risque 5%,
le risque de rejeter une hypothese vraie est egal à 5%