Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Standardabweichung berechnen? (https://www.delphipraxis.net/167470-standardabweichung-berechnen.html)

BUG 1. Apr 2012 02:38

AW: Standardabweichung berechnen?
 
Mich würde trotzdem noch interessieren, was an der oben angegebenen Formel falsch ist.
Selbst wenn 1/7 der richtige Koeffizint wäre (siehe #4), würde der errechnete Wert nur noch größer werden.

Bummi 1. Apr 2012 07:19

AW: Standardabweichung berechnen?
 
ich war zu faul den ersten Post mit Fleisch zu versehen, ich meine 1/7 müsste passen
Delphi-Quellcode:
Function TestStdDev(a: Array of Double): Double;
var
  i: Integer;
  MW: Double;
begin
  MW := 0;
  Result := 0;
  for i := 0 to High(a) do MW := MW + a[i];
  MW := MW / ( High(a) + 1);
  for i := 0 to High(a) do Result := Result + Power(a[i] - MW, 2);
  Result := SQRT(Result / High(a));
end;

procedure TForm2.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  SetLength(a, 10);
  for i := 0 to High(a) - 1 do
    a[i] := Random(100);
  Label1.Caption := FloatToStr(StdDev(a));
  Label2.Caption := FloatToStr(TestStdDev(a));
end;

ASM 1. Apr 2012 09:44

AW: Standardabweichung berechnen?
 
Zitat:

Zitat von BUG (Beitrag 1159623)
Mich würde trotzdem noch interessieren, was an der oben angegebenen Formel falsch ist.
Selbst wenn 1/7 der richtige Koeffizint wäre (siehe #4), würde der errechnete Wert nur noch größer werden.

Was soll denn diese äußerst merkwürdige Aussage ?

Wenn man eine statistische Auswertung erstellt, dann sollte man - auch bei bloßer Übernahme einer vorgefertigten Formel wie beispielsweise StdDev() bzw. MeanAndStdDev() aus der Unit Math - wenigstens verstehen, wie die Standardabweichung überhaupt zustande kommt, was sie beinhaltet: speziell hier eben ganz fundamental Stichwort Freiheitsgrad. Dieser aber wurde selbst nach dem entsprechenden Hinweis in #4 völlig ignoriert und wird in der grundlegenden Bedeutung offenbar gar nicht verstanden.

Berücksichtigt man korrekterweise den zutreffenden Freiheitsgrad in der in #6 verwendeten Formel, dann kommt mit deren Berechnung auch exakt der richtige Wert für die Standardabweichung heraus. Auch wenn diese selbstgebastelte Formel so etwas von unübersichtlich strukturiert ist...

BUG 1. Apr 2012 15:07

AW: Standardabweichung berechnen?
 
Zitat:

Zitat von ASM (Beitrag 1159633)
Was soll denn diese äußerst merkwürdige Aussage ?

  1. Ich sollte endlich mal eine Statistikvorlesung besuchen :pale:
  2. Der TE hat bemängelt, das die berechneten Werte zu groß sind. Egal was diese bedeuten, durch einen größeren Koeffizienten werden sie auf jeden Fall größer.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:34 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz