function [xbar,s]=mitstand(x)

n=length(x);
xbar=0;
s=0;
xbar=1/n*sum(x);
if n==1
    dist('Standardabweichung nicht definiert:')
end
s=x-xbar;
s=s.^2;
s=sqrt(1/(n-1)*sum(s));


end