D2: Integer;
Свойство D2 определяет вторую степень свободы распределения.
Значение свойства должно удовлетворять условию: D2 ≥ 1.
Для выполнения примера добавьте ссылку на системную сборку Stat.
Sub UserProc;
Var
Distrib: ISmStudentDistribution;
Values: Array Of Double;
i: Integer;
Const
Cnt = 10;
Begin
Distrib := New SmStudentDistribution.Create;
Distrib.D := 3;
Values := Distrib.RandomVector(Cnt);
For i := 0 To Cnt - 1 Do
Debug.WriteLine(Values[i]);
End For;
End Sub UserProc;
После выполнения примера в окно консоли будет выведена выборка псевдослучайных чисел из распределения Фишера с двумя заданными степенями свободы.
См. также: