ISmVarianceAnalysis.UnbiasedEstimation

Syntax

UnbiasedEstimation: IVarianceAnalysisUnbiasedEstimation;

Description

The UnbiasedEstimation property returns the unbiased estimated sum of deviation squares.

Example

Sub Main;

Var

VA: SmVarianceAnalysis;

res: Integer;

m: Array Of Double;

UE: IVarianceAnalysisUnbiasedEstimation;

Begin

VA := New SmVarianceAnalysis.Create;

m := New Double[5, 3];

m[0, 0] := 1; m[0, 1] := 4; m[0, 2] := 1;

m[1, 0] := 2; m[1, 1] := 3; m[1, 2] := 2;

m[2, 0] := 3; m[2, 1] := 3; m[2, 2] := 1;

m[3, 0] := 4; m[3, 1] := 1; m[3, 2] := 2;

m[4, 0] := 5; m[4, 1] := 1; m[4, 2] := 1;

VA.Data := m;

VA.AnalysisType := VarianceAnalysisType.TwoFactor; // two-factor analysis

VA.ConfidenceLevel := 0.05;

res := VA.Execute;

If res <> 0 Then

Debug.WriteLine(VA.Errors);

Else

Debug.WriteLine("Unbiased estimated sum of deviation squares");

UE := VA.UnbiasedEstimation;

Debug.WriteLine("rows : " + UE.Rows.ToString);

Debug.WriteLine("columns : " + UE.Columns.ToString);

Debug.WriteLine("accuracy : " + UE.Accuracy.ToString);

End If;

End Sub Main;

Executing the example displays the results of the variance analysis in the console window:

Module execution started

Unbiased estimated sum of deviation squares

Rows: 0.066666666666666735

Columns: 3.2666666666666671

Error: 2.2666666666666622

Module execution finished

See also:

ISmVarianceAnalysis