n->

k->

Mittel->

n = 365 (slider from 10 to 400, step 1)
Fächer = Sequence(1, n)
k = 73 (slider from 1 to n, step 1)
wartezeiten: B4:B203
klassenliste = Classes(wartezeiten, -0.5, 1)
λ: (k - 1) / n
f(x) = If[x > 0, (λ * exp((-((λ * x)))))]
wahrscheinlichkeiten = Sequence(((n - i) / n)^(k - 1) - ((n - i - 1) / n)^(k - 1), i, 0, n - 1)
wahrscheinlichkeitshistogramm = BarChart(Sequence[i, i, 0, n - 1], wahrscheinlichkeiten)
A4 = Sort(Sample[Sequence[1, n], k - 1, true])
A5 = Sort(Sample[Sequence[1, n], k - 1, true])
A6 = Sort(Sample[Sequence[1, n], k - 1, true])
A7 = Sort(Sample[Sequence[1, n], k - 1, true])
A8 = Sort(Sample[Sequence[1, n], k - 1, true])
A9 = Sort(Sample[Sequence[1, n], k - 1, true])
A10 = Sort(Sample[Sequence[1, n], k - 1, true])
A11 = Sort(Sample[Sequence[1, n], k - 1, true])
A12 = Sort(Sample[Sequence[1, n], k - 1, true])
A13 = Sort(Sample[Sequence[1, n], k - 1, true])
A14 = Sort(Sample[Sequence[1, n], k - 1, true])
A15 = Sort(Sample[Sequence[1, n], k - 1, true])
A16 = Sort(Sample[Sequence[1, n], k - 1, true])
A17 = Sort(Sample[Sequence[1, n], k - 1, true])
A18 = Sort(Sample[Sequence[1, n], k - 1, true])
A19 = Sort(Sample[Sequence[1, n], k - 1, true])
A20 = Sort(Sample[Sequence[1, n], k - 1, true])
A21 = Sort(Sample[Sequence[1, n], k - 1, true])
A22 = Sort(Sample[Sequence[1, n], k - 1, true])
A23 = Sort(Sample[Sequence[1, n], k - 1, true])
A24 = Sort(Sample[Sequence[1, n], k - 1, true])
A25 = Sort(Sample[Sequence[1, n], k - 1, true])
A26 = Sort(Sample[Sequence[1, n], k - 1, true])
A27 = Sort(Sample[Sequence[1, n], k - 1, true])
A28 = Sort(Sample[Sequence[1, n], k - 1, true])
A29 = Sort(Sample[Sequence[1, n], k - 1, true])
A30 = Sort(Sample[Sequence[1, n], k - 1, true])
A31 = Sort(Sample[Sequence[1, n], k - 1, true])
A32 = Sort(Sample[Sequence[1, n], k - 1, true])
A33 = Sort(Sample[Sequence[1, n], k - 1, true])
A34 = Sort(Sample[Sequence[1, n], k - 1, true])
A35 = Sort(Sample[Sequence[1, n], k - 1, true])
A36 = Sort(Sample[Sequence[1, n], k - 1, true])
A37 = Sort(Sample[Sequence[1, n], k - 1, true])
A38 = Sort(Sample[Sequence[1, n], k - 1, true])
A39 = Sort(Sample[Sequence[1, n], k - 1, true])
A40 = Sort(Sample[Sequence[1, n], k - 1, true])
A41 = Sort(Sample[Sequence[1, n], k - 1, true])
A42 = Sort(Sample[Sequence[1, n], k - 1, true])
A43 = Sort(Sample[Sequence[1, n], k - 1, true])
A44 = Sort(Sample[Sequence[1, n], k - 1, true])
A45 = Sort(Sample[Sequence[1, n], k - 1, true])
A46 = Sort(Sample[Sequence[1, n], k - 1, true])
A47 = Sort(Sample[Sequence[1, n], k - 1, true])
A48 = Sort(Sample[Sequence[1, n], k - 1, true])
A49 = Sort(Sample[Sequence[1, n], k - 1, true])
A50 = Sort(Sample[Sequence[1, n], k - 1, true])
A51 = Sort(Sample[Sequence[1, n], k - 1, true])
A52 = Sort(Sample[Sequence[1, n], k - 1, true])
A53 = Sort(Sample[Sequence[1, n], k - 1, true])
A54 = Sort(Sample[Sequence[1, n], k - 1, true])
A55 = Sort(Sample[Sequence[1, n], k - 1, true])
A56 = Sort(Sample[Sequence[1, n], k - 1, true])
A57 = Sort(Sample[Sequence[1, n], k - 1, true])
A58 = Sort(Sample[Sequence[1, n], k - 1, true])
A59 = Sort(Sample[Sequence[1, n], k - 1, true])
A60 = Sort(Sample[Sequence[1, n], k - 1, true])
A61 = Sort(Sample[Sequence[1, n], k - 1, true])
A62 = Sort(Sample[Sequence[1, n], k - 1, true])
A63 = Sort(Sample[Sequence[1, n], k - 1, true])
A64 = Sort(Sample[Sequence[1, n], k - 1, true])
A65 = Sort(Sample[Sequence[1, n], k - 1, true])
A66 = Sort(Sample[Sequence[1, n], k - 1, true])
A67 = Sort(Sample[Sequence[1, n], k - 1, true])
A68 = Sort(Sample[Sequence[1, n], k - 1, true])
A69 = Sort(Sample[Sequence[1, n], k - 1, true])
A70 = Sort(Sample[Sequence[1, n], k - 1, true])
A71 = Sort(Sample[Sequence[1, n], k - 1, true])
A72 = Sort(Sample[Sequence[1, n], k - 1, true])
A73 = Sort(Sample[Sequence[1, n], k - 1, true])
A74 = Sort(Sample[Sequence[1, n], k - 1, true])
A75 = Sort(Sample[Sequence[1, n], k - 1, true])
A76 = Sort(Sample[Sequence[1, n], k - 1, true])
A77 = Sort(Sample[Sequence[1, n], k - 1, true])
A78 = Sort(Sample[Sequence[1, n], k - 1, true])
A79 = Sort(Sample[Sequence[1, n], k - 1, true])
A80 = Sort(Sample[Sequence[1, n], k - 1, true])
A81 = Sort(Sample[Sequence[1, n], k - 1, true])
A82 = Sort(Sample[Sequence[1, n], k - 1, true])
A83 = Sort(Sample[Sequence[1, n], k - 1, true])
A84 = Sort(Sample[Sequence[1, n], k - 1, true])
A85 = Sort(Sample[Sequence[1, n], k - 1, true])
A86 = Sort(Sample[Sequence[1, n], k - 1, true])
A87 = Sort(Sample[Sequence[1, n], k - 1, true])
A88 = Sort(Sample[Sequence[1, n], k - 1, true])
A89 = Sort(Sample[Sequence[1, n], k - 1, true])
A90 = Sort(Sample[Sequence[1, n], k - 1, true])
A91 = Sort(Sample[Sequence[1, n], k - 1, true])
A92 = Sort(Sample[Sequence[1, n], k - 1, true])
A93 = Sort(Sample[Sequence[1, n], k - 1, true])
A94 = Sort(Sample[Sequence[1, n], k - 1, true])
A95 = Sort(Sample[Sequence[1, n], k - 1, true])
A96 = Sort(Sample[Sequence[1, n], k - 1, true])
A97 = Sort(Sample[Sequence[1, n], k - 1, true])
A98 = Sort(Sample[Sequence[1, n], k - 1, true])
A99 = Sort(Sample[Sequence[1, n], k - 1, true])
A100 = Sort(Sample[Sequence[1, n], k - 1, true])
A101 = Sort(Sample[Sequence[1, n], k - 1, true])
A102 = Sort(Sample[Sequence[1, n], k - 1, true])
A103 = Sort(Sample[Sequence[1, n], k - 1, true])
A104 = Sort(Sample[Sequence[1, n], k - 1, true])
A105 = Sort(Sample[Sequence[1, n], k - 1, true])
A106 = Sort(Sample[Sequence[1, n], k - 1, true])
A107 = Sort(Sample[Sequence[1, n], k - 1, true])
A108 = Sort(Sample[Sequence[1, n], k - 1, true])
A109 = Sort(Sample[Sequence[1, n], k - 1, true])
A110 = Sort(Sample[Sequence[1, n], k - 1, true])
A111 = Sort(Sample[Sequence[1, n], k - 1, true])
A112 = Sort(Sample[Sequence[1, n], k - 1, true])
A113 = Sort(Sample[Sequence[1, n], k - 1, true])
A114 = Sort(Sample[Sequence[1, n], k - 1, true])
A115 = Sort(Sample[Sequence[1, n], k - 1, true])
A116 = Sort(Sample[Sequence[1, n], k - 1, true])
A117 = Sort(Sample[Sequence[1, n], k - 1, true])
A118 = Sort(Sample[Sequence[1, n], k - 1, true])
A119 = Sort(Sample[Sequence[1, n], k - 1, true])
A120 = Sort(Sample[Sequence[1, n], k - 1, true])
A121 = Sort(Sample[Sequence[1, n], k - 1, true])
A122 = Sort(Sample[Sequence[1, n], k - 1, true])
A123 = Sort(Sample[Sequence[1, n], k - 1, true])
A124 = Sort(Sample[Sequence[1, n], k - 1, true])
A125 = Sort(Sample[Sequence[1, n], k - 1, true])
A126 = Sort(Sample[Sequence[1, n], k - 1, true])
A127 = Sort(Sample[Sequence[1, n], k - 1, true])
A128 = Sort(Sample[Sequence[1, n], k - 1, true])
A129 = Sort(Sample[Sequence[1, n], k - 1, true])
A130 = Sort(Sample[Sequence[1, n], k - 1, true])
A131 = Sort(Sample[Sequence[1, n], k - 1, true])
A132 = Sort(Sample[Sequence[1, n], k - 1, true])
A133 = Sort(Sample[Sequence[1, n], k - 1, true])
A134 = Sort(Sample[Sequence[1, n], k - 1, true])
A135 = Sort(Sample[Sequence[1, n], k - 1, true])
A136 = Sort(Sample[Sequence[1, n], k - 1, true])
A137 = Sort(Sample[Sequence[1, n], k - 1, true])
A138 = Sort(Sample[Sequence[1, n], k - 1, true])
A139 = Sort(Sample[Sequence[1, n], k - 1, true])
A140 = Sort(Sample[Sequence[1, n], k - 1, true])
A141 = Sort(Sample[Sequence[1, n], k - 1, true])
A142 = Sort(Sample[Sequence[1, n], k - 1, true])
A143 = Sort(Sample[Sequence[1, n], k - 1, true])
A144 = Sort(Sample[Sequence[1, n], k - 1, true])
A145 = Sort(Sample[Sequence[1, n], k - 1, true])
A146 = Sort(Sample[Sequence[1, n], k - 1, true])
A147 = Sort(Sample[Sequence[1, n], k - 1, true])
A148 = Sort(Sample[Sequence[1, n], k - 1, true])
A149 = Sort(Sample[Sequence[1, n], k - 1, true])
A150 = Sort(Sample[Sequence[1, n], k - 1, true])
A151 = Sort(Sample[Sequence[1, n], k - 1, true])
A152 = Sort(Sample[Sequence[1, n], k - 1, true])
A153 = Sort(Sample[Sequence[1, n], k - 1, true])
A154 = Sort(Sample[Sequence[1, n], k - 1, true])
A155 = Sort(Sample[Sequence[1, n], k - 1, true])
A156 = Sort(Sample[Sequence[1, n], k - 1, true])
A157 = Sort(Sample[Sequence[1, n], k - 1, true])
A158 = Sort(Sample[Sequence[1, n], k - 1, true])
A159 = Sort(Sample[Sequence[1, n], k - 1, true])
A160 = Sort(Sample[Sequence[1, n], k - 1, true])
A161 = Sort(Sample[Sequence[1, n], k - 1, true])
A162 = Sort(Sample[Sequence[1, n], k - 1, true])
A163 = Sort(Sample[Sequence[1, n], k - 1, true])
A164 = Sort(Sample[Sequence[1, n], k - 1, true])
A165 = Sort(Sample[Sequence[1, n], k - 1, true])
A166 = Sort(Sample[Sequence[1, n], k - 1, true])
A167 = Sort(Sample[Sequence[1, n], k - 1, true])
A168 = Sort(Sample[Sequence[1, n], k - 1, true])
A169 = Sort(Sample[Sequence[1, n], k - 1, true])
A170 = Sort(Sample[Sequence[1, n], k - 1, true])
A171 = Sort(Sample[Sequence[1, n], k - 1, true])
A172 = Sort(Sample[Sequence[1, n], k - 1, true])
A173 = Sort(Sample[Sequence[1, n], k - 1, true])
A174 = Sort(Sample[Sequence[1, n], k - 1, true])
A175 = Sort(Sample[Sequence[1, n], k - 1, true])
A176 = Sort(Sample[Sequence[1, n], k - 1, true])
A177 = Sort(Sample[Sequence[1, n], k - 1, true])
A178 = Sort(Sample[Sequence[1, n], k - 1, true])
A179 = Sort(Sample[Sequence[1, n], k - 1, true])
A180 = Sort(Sample[Sequence[1, n], k - 1, true])
A181 = Sort(Sample[Sequence[1, n], k - 1, true])
A182 = Sort(Sample[Sequence[1, n], k - 1, true])
A183 = Sort(Sample[Sequence[1, n], k - 1, true])
A184 = Sort(Sample[Sequence[1, n], k - 1, true])
A185 = Sort(Sample[Sequence[1, n], k - 1, true])
A186 = Sort(Sample[Sequence[1, n], k - 1, true])
A187 = Sort(Sample[Sequence[1, n], k - 1, true])
A188 = Sort(Sample[Sequence[1, n], k - 1, true])
A189 = Sort(Sample[Sequence[1, n], k - 1, true])
A190 = Sort(Sample[Sequence[1, n], k - 1, true])
A191 = Sort(Sample[Sequence[1, n], k - 1, true])
A192 = Sort(Sample[Sequence[1, n], k - 1, true])
A193 = Sort(Sample[Sequence[1, n], k - 1, true])
A194 = Sort(Sample[Sequence[1, n], k - 1, true])
A195 = Sort(Sample[Sequence[1, n], k - 1, true])
A196 = Sort(Sample[Sequence[1, n], k - 1, true])
A197 = Sort(Sample[Sequence[1, n], k - 1, true])
A198 = Sort(Sample[Sequence[1, n], k - 1, true])
A199 = Sort(Sample[Sequence[1, n], k - 1, true])
A200 = Sort(Sample[Sequence[1, n], k - 1, true])
A201 = Sort(Sample[Sequence[1, n], k - 1, true])
A202 = Sort(Sample[Sequence[1, n], k - 1, true])
A203 = Sort(Sample[Sequence[1, n], k - 1, true])
B4: Element[A4, 1] - 1
B5: Element[A5, 1] - 1
B6: Element[A6, 1] - 1
B7: Element[A7, 1] - 1
B8: Element[A8, 1] - 1
B9: Element[A9, 1] - 1
B10: Element[A10, 1] - 1
B11: Element[A11, 1] - 1
B12: Element[A12, 1] - 1
B13: Element[A13, 1] - 1
B14: Element[A14, 1] - 1
B15: Element[A15, 1] - 1
B16: Element[A16, 1] - 1
B17: Element[A17, 1] - 1
B18: Element[A18, 1] - 1
B19: Element[A19, 1] - 1
B20: Element[A20, 1] - 1
B21: Element[A21, 1] - 1
B22: Element[A22, 1] - 1
B23: Element[A23, 1] - 1
B24: Element[A24, 1] - 1
B25: Element[A25, 1] - 1
B26: Element[A26, 1] - 1
B27: Element[A27, 1] - 1
B28: Element[A28, 1] - 1
B29: Element[A29, 1] - 1
B30: Element[A30, 1] - 1
B31: Element[A31, 1] - 1
B32: Element[A32, 1] - 1
B33: Element[A33, 1] - 1
B34: Element[A34, 1] - 1
B35: Element[A35, 1] - 1
B36: Element[A36, 1] - 1
B37: Element[A37, 1] - 1
B38: Element[A38, 1] - 1
B39: Element[A39, 1] - 1
B40: Element[A40, 1] - 1
B41: Element[A41, 1] - 1
B42: Element[A42, 1] - 1
B43: Element[A43, 1] - 1
B44: Element[A44, 1] - 1
B45: Element[A45, 1] - 1
B46: Element[A46, 1] - 1
B47: Element[A47, 1] - 1
B48: Element[A48, 1] - 1
B49: Element[A49, 1] - 1
B50: Element[A50, 1] - 1
B51: Element[A51, 1] - 1
B52: Element[A52, 1] - 1
B53: Element[A53, 1] - 1
B54: Element[A54, 1] - 1
B55: Element[A55, 1] - 1
B56: Element[A56, 1] - 1
B57: Element[A57, 1] - 1
B58: Element[A58, 1] - 1
B59: Element[A59, 1] - 1
B60: Element[A60, 1] - 1
B61: Element[A61, 1] - 1
B62: Element[A62, 1] - 1
B63: Element[A63, 1] - 1
B64: Element[A64, 1] - 1
B65: Element[A65, 1] - 1
B66: Element[A66, 1] - 1
B67: Element[A67, 1] - 1
B68: Element[A68, 1] - 1
B69: Element[A69, 1] - 1
B70: Element[A70, 1] - 1
B71: Element[A71, 1] - 1
B72: Element[A72, 1] - 1
B73: Element[A73, 1] - 1
B74: Element[A74, 1] - 1
B75: Element[A75, 1] - 1
B76: Element[A76, 1] - 1
B77: Element[A77, 1] - 1
B78: Element[A78, 1] - 1
B79: Element[A79, 1] - 1
B80: Element[A80, 1] - 1
B81: Element[A81, 1] - 1
B82: Element[A82, 1] - 1
B83: Element[A83, 1] - 1
B84: Element[A84, 1] - 1
B85: Element[A85, 1] - 1
B86: Element[A86, 1] - 1
B87: Element[A87, 1] - 1
B88: Element[A88, 1] - 1
B89: Element[A89, 1] - 1
B90: Element[A90, 1] - 1
B91: Element[A91, 1] - 1
B92: Element[A92, 1] - 1
B93: Element[A93, 1] - 1
B94: Element[A94, 1] - 1
B95: Element[A95, 1] - 1
B96: Element[A96, 1] - 1
B97: Element[A97, 1] - 1
B98: Element[A98, 1] - 1
B99: Element[A99, 1] - 1
B100: Element[A100, 1] - 1
B101: Element[A101, 1] - 1
B102: Element[A102, 1] - 1
B103: Element[A103, 1] - 1
B104: Element[A104, 1] - 1
B105: Element[A105, 1] - 1
B106: Element[A106, 1] - 1
B107: Element[A107, 1] - 1
B108: Element[A108, 1] - 1
B109: Element[A109, 1] - 1
B110: Element[A110, 1] - 1
B111: Element[A111, 1] - 1
B112: Element[A112, 1] - 1
B113: Element[A113, 1] - 1
B114: Element[A114, 1] - 1
B115: Element[A115, 1] - 1
B116: Element[A116, 1] - 1
B117: Element[A117, 1] - 1
B118: Element[A118, 1] - 1
B119: Element[A119, 1] - 1
B120: Element[A120, 1] - 1
B121: Element[A121, 1] - 1
B122: Element[A122, 1] - 1
B123: Element[A123, 1] - 1
B124: Element[A124, 1] - 1
B125: Element[A125, 1] - 1
B126: Element[A126, 1] - 1
B127: Element[A127, 1] - 1
B128: Element[A128, 1] - 1
B129: Element[A129, 1] - 1
B130: Element[A130, 1] - 1
B131: Element[A131, 1] - 1
B132: Element[A132, 1] - 1
B133: Element[A133, 1] - 1
B134: Element[A134, 1] - 1
B135: Element[A135, 1] - 1
B136: Element[A136, 1] - 1
B137: Element[A137, 1] - 1
B138: Element[A138, 1] - 1
B139: Element[A139, 1] - 1
B140: Element[A140, 1] - 1
B141: Element[A141, 1] - 1
B142: Element[A142, 1] - 1
B143: Element[A143, 1] - 1
B144: Element[A144, 1] - 1
B145: Element[A145, 1] - 1
B146: Element[A146, 1] - 1
B147: Element[A147, 1] - 1
B148: Element[A148, 1] - 1
B149: Element[A149, 1] - 1
B150: Element[A150, 1] - 1
B151: Element[A151, 1] - 1
B152: Element[A152, 1] - 1
B153: Element[A153, 1] - 1
B154: Element[A154, 1] - 1
B155: Element[A155, 1] - 1
B156: Element[A156, 1] - 1
B157: Element[A157, 1] - 1
B158: Element[A158, 1] - 1
B159: Element[A159, 1] - 1
B160: Element[A160, 1] - 1
B161: Element[A161, 1] - 1
B162: Element[A162, 1] - 1
B163: Element[A163, 1] - 1
B164: Element[A164, 1] - 1
B165: Element[A165, 1] - 1
B166: Element[A166, 1] - 1
B167: Element[A167, 1] - 1
B168: Element[A168, 1] - 1
B169: Element[A169, 1] - 1
B170: Element[A170, 1] - 1
B171: Element[A171, 1] - 1
B172: Element[A172, 1] - 1
B173: Element[A173, 1] - 1
B174: Element[A174, 1] - 1
B175: Element[A175, 1] - 1
B176: Element[A176, 1] - 1
B177: Element[A177, 1] - 1
B178: Element[A178, 1] - 1
B179: Element[A179, 1] - 1
B180: Element[A180, 1] - 1
B181: Element[A181, 1] - 1
B182: Element[A182, 1] - 1
B183: Element[A183, 1] - 1
B184: Element[A184, 1] - 1
B185: Element[A185, 1] - 1
B186: Element[A186, 1] - 1
B187: Element[A187, 1] - 1
B188: Element[A188, 1] - 1
B189: Element[A189, 1] - 1
B190: Element[A190, 1] - 1
B191: Element[A191, 1] - 1
B192: Element[A192, 1] - 1
B193: Element[A193, 1] - 1
B194: Element[A194, 1] - 1
B195: Element[A195, 1] - 1
B196: Element[A196, 1] - 1
B197: Element[A197, 1] - 1
B198: Element[A198, 1] - 1
B199: Element[A199, 1] - 1
B200: Element[A200, 1] - 1
B201: Element[A201, 1] - 1
B202: Element[A202, 1] - 1
B203: Element[A203, 1] - 1
B1: n
B2: k
B3 = mean(wartezeiten)
b = Histogram(klassenliste, wartezeiten, true, 1 / 200)
μ = Sum((Sequence[0, n - 1] * wahrscheinlichkeiten))