bsp_1_5_2.m

% Beispiel für Kap 1.5.2
%% Beladung eines Schmelzofens
kap = 3000;
mu1 = 100;
var1 = 400;
n = 27;

mug = n*mu1
varg = n*var1
sigmag = sqrt(varg)

z1 = (kap - mug)/sigmag
P = 100*(0.5 - 0.5*erf(z1/sqrt(2)))

% oder direkt
pd = makedist('Normal', 'mu', mug, 'sigma', sigmag);
P = 100*(1 - cdf(pd, kap))