$p=%v$

$n=%v$

\text{Dichtefunktion der \Normalverteilung}

df = false
p = 0.16666666666666666 (slider from 0 to 1, step 0.01)
n = 30 (slider from 30 to 1000, step 1)
s: sqrt(((n * p) * (1 - p)))
m: (n * p)
L_1 = Sequence(((nCr[n, k] * p^(k)) * (1 - p)^(n - k)), k, 0, n)
a = BarChart(Sequence[0, n], L_1, 1)
b = true
f(x) = (1 / ((s * sqrt((2 * π)))) * ℯ^((-0.5 * ((x - m) / s)^(2))))
animation: false
Text2: "" + (UnicodeToLetter[9199]) + ""