1-β

p = 0.6 (slider from 0 to 1, step 0.01)
n = 20 (slider from 0 to 200, step 1)
σ: sqrt(((p * (1 - p))) / n)
σ_0: sqrt(((1 / 3 * (1 - 1 / 3))) / n)
f = Normal(p, σ, x)
f_0 = Normal(1 / 3, σ_0, x)
α = Integral(f_0, 1 / 3 + (1.64 * σ_0), 1)
β = Integral(f, 0, 1 / 3 + (1.64 * σ_0))
texte1: "L'étudiant répond au hasard et il est reçu à l'issue du test. C'est l'erreur de première espèce α = " + α + ""
texte2: "L'étudiant ne répond pas au hasard (il a donc travaillé) mais il est recalé. C'est l'erreur de seconde espèce β = " + β + " "
a: 1 - β
texte3: "La puissance du test est la probabilité pour un étudiant qui a travaillé d'être reçu à l'issue du test. Elle vaut 1 - β = " + a + " "