# Relative und absolute Häufigkeiten

x:read("Gib die Zufallsvariable ein");

h:read("Gib die zugehörigen absoluten Häufigkeiten ein");

y:h;

wxplot2d([[discrete,x,y]]);

wxplot2d([[discrete,x,h]]);

n:length(x);

N:sum(h[i],i,1,n);

p:h/N;

wxplot2d([[discrete,x,p]]);