%Uebungsbeispiel zur Bluckdruck Messwerterfassung
%Aufgabe: Blutdruck.m
%Christian Widmer, 11.06.2002

clear;

klassen = 8;



%Messwerte

Atacand_16 = [
    126 89 82;
    138 86 72;
    147 92 77;
    146 93 78;
    128 94 68;
    145 88 73;
    130 92 66;
    132 89 64;
    131 89 70;
    135 96 66;
    132 87 75;
    136 96 75;
    131 94 68;
    133 94 59;
    132 95 67;
    136 88 75;
    132 92 63;
    133 92 75;
    136 94 67;
    139 83 74;
    132 87 72;
    124 87 68;
    132 79 64;
    124 84 65;
    148 92 68;
    141 90 69;
    128 89 68;
    140 86 68;
    136 91 68];

%Berechnung

Mittelwert = mean(Atacand_16);

ersterMittelwert=Mittelwert(:,1);

stdAbw = std(Atacand_16);

ersteStdAbw=stdAbw(:,1);

%Kollonen Trennen

erste=Atacand_16(:,1);     %Erste Spalte Kopieren in eine neue Matrix

%Berechnung Normalverteilungen
x = 120:0.1:150;
sigma1 = ersteStdAbw;
Mu=ersterMittelwert;
u1=(x-Mu)/sigma1;
norm1=1/(sigma1*sqrt(2*pi))*exp(-0.5*u1.*u1);

 
%Ausgabe


% Hystogramm 1
hold
hist(erste,klassen)

plot(x,norm1, 'r')

