stoppur-zwischenzeiten

Start

Stopp

Zwischenzeit

Stoppuhr

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

FülleSpalte(2,Anfügen[Mittel(Listewartezeiten),Listewartezeiten])

klassenbreite = 1.95 (slider from 0.01 to 10, step 0.02)
Listezwischenzeiten: {}
Listewartezeiten = If(Length[Listezwischenzeiten] ≥ 2, Sequence[Listezwischenzeiten(i + 1) - Listezwischenzeiten(i), i, 1, Length[Listezwischenzeiten] - 1], {})
Lt: (Listezwischenzeiten * 1000)
Zeit_0: {144, 46, 58, 20, 14, 12, 2021, "Dezember", "Dienstag", 3}
t = 87 (slider from 0 to 100, step 1)
Zeit_t: {731, 46, 58, 20, 14, 12, 2021, "Dezember", "Dienstag", 3}
ms_0: Element[Zeit_0, 1] + (Element[Zeit_0, 2] * 1000) + (Element[Zeit_0, 3] * 60000) + (((Element[Zeit_0, 4] * 24) * 3600) * 1000)
ms_t: Element[Zeit_t, 1] + (Element[Zeit_t, 2] * 1000) + (Element[Zeit_t, 3] * 60000) + (((Element[Zeit_t, 4] * 24) * 3600) * 1000)
msΔ: ms_t - ms_0
Stunden = Div(msΔ, 86400000)
Minuten = Div(Mod[msΔ, 86400000], 60000)
Sekunden = Div(Mod[Mod[msΔ, 86400000], 60000], 1000)
Millisekunden = Mod(Mod[Mod[msΔ, 86400000], 60000], 1000)
msms = Last("00" + Millisekunden, 3)
mm = Last("00" + Minuten, 2)
ss = Last("00" + Sekunden, 2)
hh = Last("00" + Stunden, 2)
Liste1: {hh, mm, ss, msms}
Liste2: {"Stunden", "Minuten", "Sekunden", "Millisekunden"}
Zähler = 1
Liste2b = Join({{"Zwischenzeiten"}, Liste2})
j = 1 (slider from -5 to 5, step 1)
Stoppuhr: true
Uhr: "{" + (LaTeX[TableText[{Liste2, Liste1}, "_|c"]]) + "}"
Lms = Sequence(Mod[Mod[Mod[Lt(i), 86400000], 60000], 1000], i, 1, Length[Lt])
Lmin = Sequence(Div[Mod[Lt(i), 86400000], 60000], i, 1, Length[Lt])
Ls = Sequence(Div[Mod[Mod[Lt(i), 86400000], 60000], 1000], i, 1, Length[Lt])
Lh = Sequence(Div[Lt(i), 86400000], i, 1, Length[Lt])
Tabzz = Sequence({i, Lh(i), Lmin(i), Ls(i), Lms(i)}, i, Max[Zähler - 5, 1], Zähler - 1)
l1 = Append(Liste2b, Tabzz)
ZZ = Sequence(If[i ≟ 0, Liste2b, Tabzz(i)], i, 0, Length[Tabzz])
Zwischenzeiten = TableText(ZZ, "_|c")
leereListe = Sequence("", i, 1, 300)
klas = Classes(Listewartezeiten, 0, klassenbreite)
histo = Histogram(klas, Listewartezeiten, true, 1 / Length[Listewartezeiten])
μ = mean(Listewartezeiten)
λ: 1 / μ
f(x) = If[x > 0, (λ * exp((-((λ * x)))))]
Text1 = LaTeX(λ, true, true)
Text2 = LaTeX(μ, true, true)
eqplot = Sequence(CountIf[x > Listewartezeiten(i), Listewartezeiten], i, 1, Length[Listewartezeiten])
eqplot2: eqplot / Length[Listewartezeiten]
eqplot3: (Listewartezeiten, log(eqplot2))