Aufgabe:
Man errechne die Kennzahlen Erwartungswert, Varianz und Streuung.
Code:
X:[0,1,2,4,5,6,9,10,11,14,15,17]$ H:[4,1,2,1,2,4,1,1,1,1,1,1]$ m:length(X)$ n:length(H)$ if m=n then "ok" else "Eingabefehler"; N:sum(H[i],i,1,n)$ P:H/N$ E:P.X$ V:P.(X-E)^2$ S:sqrt(V)$ display(E)$ display(V)$ display(S)$
wxMaxima: