function [emp_mittel, emp_stdabw]=stichprobe(N,mittel,stdabw)
%function [emp_mittel, emp_stdabw]=stichprobe(N,mittel,stdabw)
%bekommt als Eingabeargument die Groesse N einer Stichprobe, und den
%tatsaechlichen Mittelwert und Standardabweichung der Verteilung
%fuehrt die Funktion zufall N-Mal aus, 
%berechnet auf diesen Zahlen basierend die Verteilung der Zahlen und stellt 
%diese grafisch dar,
%und liefert die empirisch ermittelten Werte von Mittelwert und
%Standardabweichung zurueck.

%stichprobe erzeugen:
s=[];
for i=1:N
    s=[s zufall(mittel,stdabw)];
end

%empirisches Mittel und Standardabweichung berechnen:
emp_mittel=mean(s);
emp_stdabw=std(s);

%Verteilung bestimmen und darstellen:
hist(s)
