ISmGreyForecast.Serie

Синтаксис

Serie: ISlSerie;

Описание

Свойство Serie определяет исходный (объясняемый) ряд.

Пример

Sub Main;

Var

Grey: ISmGreyForecast;

d0, d1: Double;

res, i: Integer;

y: Array Of Double;

Begin

// значение y

y := New Double[43];

y[00] := 6209;

y[01] := 6385;

y[02] := 6752;

y[03] := 6837;

y[04] := 6495;

y[05] := 6907;

y[06] := 7349;

y[07] := 7213;

y[08] := 7061;

y[09] := Double.Nan;

y[10] := 7132;

y[11] := 7137;

y[12] := 7473;

y[13] := 7722;

y[14] := 8088;

y[15] := 8516;

y[16] := 8941;

y[17] := Double.Nan;

y[18] := Double.Nan;

y[19] := 9746;

y[20] := 9907;

y[21] := 10333;

y[22] := 10863;

y[23] := 11693;

y[24] := 12242;

y[25] := 12227;

y[26] := 12910;

y[27] := 13049;

y[28] := 13384;

y[29] := 14036;

y[30] := 14242;

y[31] := 14704;

y[32] := 13802;

y[33] := 14197;

y[34] := 15010;

y[35] := 15589;

y[36] := 15932;

y[37] := 16631;

y[38] := 17394;

y[39] := 17758;

y[40] := 17308;

y[41] := 16444;

y[42] := 16413;

Grey := New SmGreyForecast.Create;

Grey.Serie.Value := y;

Grey.ModelPeriod.FirstPoint := 5;

Grey.ModelPeriod.LastPoint := 40;

Grey.Forecast.LastPoint := 53;

Grey.Forecast.ConfidenceLevel := 0.8;

Grey.MissingData.Method := MissingDataMethod.SampleAverage;

res := Grey.Execute;

If res <> 0 Then

Debug.WriteLine(Grey.Errors);

Else

Debug.WriteLine(" исходный Y, модельный");

For i := Grey.ModelPeriod.FirstPoint To Grey.ModelPeriod.LastPoint Do

d0 := Y[i-1];

d1 := Grey.Fitted[i-1];

Debug.WriteLine(i.ToString + " - " + d0.ToString+" - "+d1.ToString);

End For;

End If;

End Sub Main;

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

Module execution started

исходный Y, модельный

5 - 6495 - 6495

6 - 6907 - 6993.0987483797362

7 - 7349 - 7185.9102132241533

8 - 7213 - 7384.0378136349609

9 - 7061 - 7587.6281243885169

10 - 1.#QNAN - 7796.8317615740234

11 - 7132 - 8011.8034940184443

12 - 7137 - 8232.702357785427

13 - 7473 - 8459.6917738293414

14 - 7722 - 8692.9396688948618

15 - 8088 - 8932.6185997481807

16 - 8516 - 9178.9058808356058

17 - 8941 - 9431.9837154597044

18 - 1.#QNAN - 9692.03933057416

19 - 1.#QNAN - 9959.2651152938488

20 - 9746 - 10233.858763224038

21 - 9907 - 10516.023418714525

22 - 10333 - 10805.967827145883

23 - 10863 - 11103.906489358516

24 - 11693 - 11410.05982034147

25 - 12242 - 11724.654312294151

26 - 12227 - 12047.922702186683

27 - 12910 - 12380.104143937235

28 - 13049 - 12721.444385339099

29 - 13384 - 13072.195949864341

30 - 14036 - 13432.618323480943

31 - 14242 - 13802.97814662024

32 - 14704 - 14183.54941143794

33 - 13802 - 14574.613664512639

34 - 14197 - 14976.460215134663

35 - 15010 - 15389.386349337059

36 - 15589 - 15813.69754982728

37 - 15932 - 16249.707721984014

38 - 16631 - 16697.739426082931

39 - 17394 - 17158.124115928425

40 - 17758 - 17631.20238406281

Module execution finished

См. также:

ISmGreyForecast