x

No

Lincoln

Denkmal

Summe

start

stop

reset

alle Konfidenzintervalle berechnen

einzelne Konfidenzintervalle freirubbeln

Prognoseintervalle anzeigen

info

Lassen Sie US-Pennys vertikal um die eigene Achse kreiseln.
Notieren Sie, ob am Ende die Seite L mit Lincolns Portrait oder D mit seinem Denkmal oben liegt
1. Daten in die Tabellenspalten B-D eintragen -> rel. Häufigkeiten h(D) werden als Punkte gezeichnet
2. “einzelne Konfidenzintervalle freirubbeln” sucht vertrauenswürdige Werte für p(D)
3. “Konfidenzintervalle berechnen” plottet alle Konfidenzintervalle zu p(D)

Petra

Manfred

Hannes

Hartmut

Torsten

Caren

Pia

Jürgen

Wienandt

Katharina

Anke

Irina

Dustin

Andrea

Gaby

Noah

Finja

Ronja

Paula

Carina

Cécile

Jakov

Niklas

Süleyman

Tim

Carlo

Moritz

Deniz

Abu

Jana

Elif

Anna

Carina

Charlotte

Julia

Ole

Tony

Paula

Linnea

B2: 1
C2: 116
D2: 164
B3: 2
C3: 62
D3: 87
B4: 3
C4: 106
D4: 227
B5: 4
B6: 5
C5: 118
D5: 252
C6: 29
D6: 30
B8: 7
C8: 28
D8: 272
B9: 8
C9: 79
D9: 87
B10: 9
C10: 106
D10: 245
B11: 10
C11: 87
D11: 163
B12: 11
C12: 59
D12: 193
B13: 12
C13: 54
D13: 46
B14: 13
C14: 65
D14: 244
B15: 14
C15: 66
D15: 84
B16: 15
C16: 136
D16: 144
B17: 16
C17: 41
D17: 59
B18: 17
C18: 7
D18: 93
B7: 6
C7: 88
D7: 116
E2 = Sum(CellRange(C2,D2,"numeric"))
E3 = Sum(CellRange(C3,D3,"numeric"))
E4 = Sum(CellRange(C4,D4,"numeric"))
E5 = Sum(CellRange(C5,D5,"numeric"))
E6 = Sum(CellRange(C6,D6,"numeric"))
E7 = Sum(CellRange(C7,D7,"numeric"))
E8 = Sum(CellRange(C8,D8,"numeric"))
E9 = Sum(CellRange(C9,D9,"numeric"))
E10 = Sum(CellRange(C10,D10,"numeric"))
E11 = Sum(CellRange(C11,D11,"numeric"))
E12 = Sum(CellRange(C12,D12,"numeric"))
E13 = Sum(CellRange(C13,D13,"numeric"))
E14 = Sum(CellRange(C14,D14,"numeric"))
E15 = Sum(CellRange(C15,D15,"numeric"))
E16 = Sum(CellRange(C16,D16,"numeric"))
E17 = Sum(CellRange(C17,D17,"numeric"))
E18 = Sum(CellRange(C18,D18,"numeric"))
I = Segment((0, 0), (0, 1))
p = 0.5 (slider from 0 to 1, step 0.001)
modell: (0, p)
n = CountIf(x > 0, CellRange(E2,E50,"numeric"))
f(x) = If[0 < x < n, p]
X = Sequence(i, i, 1, n)
rh = Sequence(Cell[4, i] / (Cell[3, i] + Cell[4, i]), i, 2, n + 1)
Datenpunkte: (X, rh)
N = Sequence(Cell[3, i] + Cell[4, i], i, 2, n + 1)
nummer = 7 (slider from 0 to n, step 1)
Q: (nummer, p)
PIu = Sequence(p - (2 * sqrt(((p * (1 - p))) / N(i))), i, 1, n)
PIo = Sequence(p + (2 * sqrt(((p * (1 - p))) / N(i))), i, 1, n)
imPI_{1} = Sequence(If[PIu(i) ≤ rh(i) ≤ PIo(i), true, false], i, 1, n)
Spur: (nummer, p)
KIu = Sequence((rh(i) + 2 / N(i) - (2 * sqrt(1 / (N(i))^(2) + (rh(i) * (1 - rh(i)) / N(i))))) / (1 + 4 / N(i)), i, 1, n)
KIo = Sequence((rh(i) + 2 / N(i) + (2 * sqrt(1 / (N(i))^(2) + (rh(i) * (1 - rh(i)) / N(i))))) / (1 + 4 / N(i)), i, 1, n)
KI = Sequence(Segment[(i, KIu(i)), (i, KIo(i))], i, 1, n)
kija = false
a = true
imPI = Sum(imPI_{1})
Text1 = LaTeX(imPI, true, true)
PI = Sequence(Segment[(i, Max[-1, PIu(i)]), (i, Min[2, PIo(i)])], i, 1, n)
D19: 147
D20: 53
D21: 162
D22: 217
D23: 104
D24: 104
D25: 54
D26: 149
D27: 101
D28: 40
D29: 45
D30: 128
D31: 73
D32: 208
D33: 185
D34: 300
D35: 84
D36: 98
D37: 109
D38: 92
D39: 80
D40: 94
C19: 86
C20: 47
C21: 140
C22: 84
C23: 53
C24: 46
C25: 25
C26: 61
C27: 99
C28: 10
C29: 55
C30: 62
C31: 27
C32: 137
C33: 65
C34: 50
C35: 66
C36: 52
C37: 36
C38: 58
C39: 70
C40: 56
B19: 18
B20: 19
B21: 20
B22: 21
B23: 22
B24: 23
B25: 24
B26: 25
B27: 26
B28: 27
B29: 28
B30: 29
B31: 30
B32: 31
B33: 32
B34: 33
B35: 34
B36: 35
B37: 36
B38: 38
B39: 39
B40: 40
E19 = Sum(CellRange(C19,D19,"numeric"))
E20 = Sum(CellRange(C20,D20,"numeric"))
E21 = Sum(CellRange(C21,D21,"numeric"))
E22 = Sum(CellRange(C22,D22,"numeric"))
E23 = Sum(CellRange(C23,D23,"numeric"))
E24 = Sum(CellRange(C24,D24,"numeric"))
E25 = Sum(CellRange(C25,D25,"numeric"))
E26 = Sum(CellRange(C26,D26,"numeric"))
E27 = Sum(CellRange(C27,D27,"numeric"))
E28 = Sum(CellRange(C28,D28,"numeric"))
E29 = Sum(CellRange(C29,D29,"numeric"))
E30 = Sum(CellRange(C30,D30,"numeric"))
E31 = Sum(CellRange(C31,D31,"numeric"))
E32 = Sum(CellRange(C32,D32,"numeric"))
E33 = Sum(CellRange(C33,D33,"numeric"))
E34 = Sum(CellRange(C34,D34,"numeric"))
E35 = Sum(CellRange(C35,D35,"numeric"))
E36 = Sum(CellRange(C36,D36,"numeric"))
E37 = Sum(CellRange(C37,D37,"numeric"))
E38 = Sum(CellRange(C38,D38,"numeric"))
E39 = Sum(CellRange(C39,D39,"numeric"))
E40 = Sum(CellRange(C40,D40,"numeric"))
M = Sum(CellRange(D2,D40,"numeric"))
L = Sum(CellRange(C2,C40,"numeric"))
Load: round(M / (L + M), 3)
b = true
c = true
C41: 0
D41: 0
E41 = Sum(CellRange(C41,D41,"numeric"))
C42: 0
D42: 0
E42 = Sum(CellRange(C42,D42,"numeric"))
C43: 0
D43: 0
E43 = Sum(CellRange(C43,D43,"numeric"))
C44: 0
D44: 0
E44 = Sum(CellRange(C44,D44,"numeric"))
C45: 0
D45: 0
E45 = Sum(CellRange(C45,D45,"numeric"))
C46: 0
D46: 0
E46 = Sum(CellRange(C46,D46,"numeric"))
C47: 0
D47: 0
E47 = Sum(CellRange(C47,D47,"numeric"))
C48: 0
D48: 0
E48 = Sum(CellRange(C48,D48,"numeric"))
C49: 0
D49: 0
E49 = Sum(CellRange(C49,D49,"numeric"))
C50: 0
D50: 0
E50 = Sum(CellRange(C50,D50,"numeric"))
B41: 41
B42: 42
B43: 43
B44: 44
B45: 45
B46: 46
B47: 47
B48: 48
B49: 49
B50: 50