ISmSlideSmoothing.Residuals

Синтаксис

Residuals: Array;

Описание

Свойство Residuals возвращает ряд остатков.

Пример

Sub Main;

Var

Slide: SmSlideSmoothing;

s, ar: Array Of Double;

d: Double;

res, i: Integer;

Begin

s := New Double[10];

s[0] := 670.2;

s[1] := 576.06;

s[2] := 717.6;

s[3] := 856.9;

s[4] := 885.4;

s[5] := 1011.8;

s[6] := 995.44;

s[7] := 1064.74;

s[8] := 1033.3;

s[9] := 780.8584552;

Slide := New SmSlideSmoothing.Create;

Slide.Serie.Value := s;

Slide.ModelPeriod.FirstPoint := 1;

Slide.ModelPeriod.LastPoint := 10;

Slide.Width := 3;

Slide.CenterMovingAverage := True;

res := Slide.Execute;

If res <> 0 Then

Debug.WriteLine(Slide.Errors);

Else

Debug.WriteLine("== Остатки ==");

ar := Slide.Residuals;

For i := 0 To Slide.ModelPeriod.LastPoint - 1 Do

d := ar[i];

Debug.WriteLine(i.ToString + ", " + d.ToString);

End For;

End If;

End Sub Main;

После выполнения примера в окно консоли будет выведен ряд остатков:

Module execution started

== Остатки ==

0, 1.#QNAN

1, -78.560000000000059

2, 0.7466666666666697

3, 36.93333333333328

4, -32.633333333333326

5, 47.586666666666702

6, -28.553333333333285

7, 33.579999999999927

8, 73.667181599999935

9, 1.#QNAN

Module execution finished

См. также:

ISmSlideSmoothing