Einzelnen Beitrag anzeigen

atgis
(Gast)

n/a Beiträge
 
#44

Re: StringGrid - Minimum, Maximum, Durchschnitt bestimmen

  Alt 20. Sep 2007, 16:40
So ich habs endlich ...

Also ich hab eine Bsp. Rechnung gefunden. Ich möchte es mal kurz erklären:

Die Standardabweichung ist eine einfache nummerische Transformation der Varianz. Sie entspricht der Quadratwurzel aus der Varianz.

Die Varianz basiert auf der Summe der quadrierten Abweichungen jedes Variablenwertes vom arithmetischen Mittel geteilt durch die Anzahl der Variablen minus 1 (n-1).

Beispiel: Die Varianz der Altersangaben 18, 21, 21, 27, 27, 27, 30, 31 und 45 berechnet man wie folgt:

Mittelwert:
18+21+21+27+27+27+30+31+45 = 247
247 / 9 = 27,44444444

Varianz:
18-27,44444444² = 89,197
21-27,44444444² = 41,530
21-27,44444444² = 41,530
27-27,44444444² = 0,197
27-27,44444444² = 0,197
27-27,44444444² = 0,197
30-27,44444444² = 6,531
31-27,44444444² = 12,642
45-27,44444444² =308,197

Summe = 500,218531

Standardabweichung:
Wurzel aus(500,218531 / 9 -1)
= 7,91 Jahre




In Delphi sieht es nun so aus:

Delphi-Quellcode:
Mittelwert:= summe / (sgMess.RowCount-1);
AbweichungsQuadrat:=0;
for i:= 1 to sgMess.RowCount-1 do
 AbweichungsQuadrat:=AbweichungsQuadrat + (StrToFloat(sgMess.Cells[1,i]) - Mittelwert) * (StrToFloat(sgMess.Cells[1,i]) - Mittelwert);
 Standardabweichung:= SQRT((AbweichungsQuadrat)/(sgMess.RowCount-2));

edAbw.text:=FloatToStrF(Standardabweichung, ffFixed, 10, 2);
Vielen Danke an alle, die mir so tatkräftig geholfen haben!
  Mit Zitat antworten Zitat