Neustart

nächste Möglichkeit

\cdot

Anzahl der T-N-Folgen mit gleicher Trefferanzahl:

Trefferwahrscheinlichkeit:

Anzahl der Treffer:

Länge der Bernoulli-Kette:

X: Anzahl der Treffer

p =

Wahrscheinlichkeit der T-N-Folge:

Treffer-Nieten-Folge:

n = 10 (slider from 0 to 10, step 1)
k = 2 (slider from 0 to n, step 1)
auswahl: {1,2}
m = Length(auswahl)
posInc: m - IndexOf[true, Sequence[Element[Reverse[auswahl], i] < n - i + 1, i, 1, m]] + 1
zaehler = 1 (slider from 0 to 10000, step 1)
darstellungAuswahl = Sequence(If[¬Defined[IndexOf[i, auswahl]], Text["\Box", ((2 * i) | 2), false, true], Text["\boxtimes", ((2 * i) | 2), false, true]], i, 1, n)
p = 0.25 (slider from 0 to 1, step 0.01)
q: 1 - p
tp: "\stackrel{" + (LaTeX[p]) + "}{\longrightarrow}"
tq: "\stackrel{" + (LaTeX[q]) + "}{\longrightarrow}"
darstellungWahrscheinlichkeiten = Sequence(If[¬Defined[IndexOf[i, auswahl]], Text[tq, ((2 * i) - 1 | 2.15), true, true], Text[tp, ((2 * i) - 1 | 2.15), true, true]], i, 1, n)
Text4: "" + zaehler + ""
bin = nCr(n, k)
Text1: "P(\underbrace{X = " + (LaTeX[k]) + "}_{" + (LaTeX[k]) + " \text{Treffer}}) = \underbrace{\binom{" + (LaTeX[n]) + "}{" + (LaTeX[k]) + "}}_{" + (LaTeX[bin]) + "} \cdot " + (LaTeX[p]) + "^{" + (LaTeX[k]) + "} \cdot " + (LaTeX[q]) + "^{" + (LaTeX[n - k]) + "}"
Eingabefeld1 = Textfield(p)
Text11: "" + (LaTeX[p]) + "^{" + (LaTeX[k]) + "} \cdot " + (LaTeX[q]) + "^{" + (LaTeX[n - k]) + "}"