ISmx12arima.OutliersARIMAtc

Синтаксис Fore

OutliersARIMAtc: ISlOutliers;

Синтаксис Fore.NET

OutliersARIMAtc: Prognoz.Platform.Interop.Stat.ISlOutliers;

Описание

Свойство OutliersARIMAtc возвращает список выбросов типа «временный сдвиг уровня», учитываемых на шаге ARIMA.

Комментарии

Для определения, включать ли в процедуру учет выбросов, используйте свойство ISmx12arima.OutliersDetection.

Пример Fore

Для выполнения примера добавьте ссылку на системную сборку Stat.

Sub UserProc;
Var
    cens: ISmX12ARIMA;
    y: Array[62] Of Double;
    outlier: ICensus2PeriodBegin;
    i, res: Integer;
Begin
    cens := New SmX12ARIMA.Create;
    // Значения объясняемого ряда
    y[0] :=  284; y[1] := 277;  y[2] := 338;  y[3] := 363;  y[4] := 370; y[5] := 388;
    y[6] :=  407; y[7] := 427;  y[8] := 368;  y[9] := 365;  y[10] := 353; y[11] := 375;
    y[12] := 248; y[13] := 263; y[14] := 322; y[15] := 396; y[16] := 412; y[17] := 451;
    y[18] := 457; y[19] := 457; y[20] := 463; y[21] := 443; y[22] := 411; y[23] := 398;
    y[24] := 335; y[25] := 321; y[26] := 393; y[27] := 418; y[28] := 431; y[29] := 499;
    y[30] := 583; y[31] := 578; y[32] := 497; y[33] := 519; y[34] := 528; y[35] := 508;
    y[36] := 422; y[37] := 439; y[38] := 494; y[39] := 539; y[40] := 559; y[41] := 603;
    y[42] := 627; y[43] := 612; y[44] := 548; y[45] := 480; y[46] := 385; y[47] := 428;
    y[48] := 307; y[49] := 273; y[50] := 334; y[51] := 390; y[52] := 415; y[53] := 453;
    y[54] := 450; y[55] := 479; y[56] := 420; y[57] := 387; y[58] := 381; y[59] := 414;
    y[60] := 335; y[61] := 326;
    /// Общие настройки ///
    //Период расчета
    cens.ModelPeriod.FirstPoint := 1;
    cens.ModelPeriod.LastPoint := 62;
    //Выбор объясняемой переменной
    cens.Serie.Value := y;
    //Кварталы или месяцы
    cens.SeasonalComponentCycleType := SeasonalityCycleType.Month;
    cens.StartPeriod.MonthOrQuarter := 2;
    cens.StartPeriod.Year := 2000;
    /// Настройки сезонности ///
    //Тип сезонности
    cens.SeasonalAdjustmentMode := SeasonalityTypeX12.Additive;
    //Сезонный фильтр
    cens.SeasonalFilter := SeasonalFilterType.Auto;
    /// Поправки на рабочие дни и праздники ///
    cens.AdjustmentOptions := AdjustmentOptionsX12Type.ArimaStep;
    // Поправка на рабочие дни
    cens.TradingDayEffects := TradingDayEffectsX12Type.Td;
    // Поправка на праздничные дни
    cens.Easter.IsActive := True;
    cens.Easter.Day := 8;
    cens.Labor.IsActive := True;
    cens.Labor.Day := 1;
    cens.Thanksgiving.IsActive := True;
    cens.Thanksgiving.Day := 2;
    cens.Sceaster.IsActive := False;
    /// Выбросы ///
    outlier := cens.OutliersARIMAtc.Add;
    outlier.Year := 2004;
    outlier.MonthOrQuarter := 2;
    outlier := cens.OutliersARIMArpbegin.Add;
    outlier.Year := 2002;
    outlier.MonthOrQuarter := 1;
    outlier := cens.OutliersARIMArpend.Add;
    outlier.Year := 2002;
    outlier.MonthOrQuarter := 5;
    /// Диагностика /// 
    // Анализ стабильности сезонных компонент
    cens.StabilityAnalysisofSeasonals := StabilityAnalysisofSeasonalsX12Type.None;
    //Прочее
    cens.SpectralPlots := True;
    /// Рассчет модели ///
    res := cens.Execute;
    Debug.WriteLine(cens.Errors);
    For i := 0 To cens.WarningsCount - 1 Do
        Debug.WriteLine(cens.Warnings[i]);
    End For;
    If (res = 0) Then
        Debug.WriteLine("=== Поправки на праздничные дни ===");
        Debug.Indent;
        For i := 0 To cens.CombinedHolidayFactors.Length - 1 Do
            Debug.WriteLine(cens.CombinedHolidayFactors[i]);
        End For;
        Debug.Unindent;
        Debug.WriteLine("=== Спектральные частоты SP1 ===");
        Debug.Indent;
        For i := 0 To cens.SP1frequency.Length - 1 Do
            Debug.WriteLine(cens.SP1frequency[i]);
        End For;
        Debug.Unindent;
        Debug.WriteLine("=== Спектральные плотности SP1 ===");
        Debug.Indent;
        For i := 0 To cens.SP1spectr.Length - 1 Do
            Debug.WriteLine(cens.SP1spectr[i]);
        End For;
        Debug.Unindent;
    End If;
End Sub UserProc;

В результате выполнения примера будет создана модель X12, в окно консоли будут выведены:

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Stat;
…
Public Shared Sub Main(Params: StartParams);
Var
    cens: ISmX12ARIMA;
    y: Array[62] Of Double;
    outlier: ICensus2PeriodBegin;
    i, res: Integer;
    Warnings, CombHFactors, SP1F, SP1S: System.Array;
Begin
    cens := New SmX12ARIMA.Create();
    // Значения объясняемого ряда
    y[0] :=  284; y[1] := 277;  y[2] := 338;  y[3] := 363;  y[4] := 370; y[5] := 388;
    y[6] :=  407; y[7] := 427;  y[8] := 368;  y[9] := 365;  y[10] := 353; y[11] := 375;
    y[12] := 248; y[13] := 263; y[14] := 322; y[15] := 396; y[16] := 412; y[17] := 451;
    y[18] := 457; y[19] := 457; y[20] := 463; y[21] := 443; y[22] := 411; y[23] := 398;
    y[24] := 335; y[25] := 321; y[26] := 393; y[27] := 418; y[28] := 431; y[29] := 499;
    y[30] := 583; y[31] := 578; y[32] := 497; y[33] := 519; y[34] := 528; y[35] := 508;
    y[36] := 422; y[37] := 439; y[38] := 494; y[39] := 539; y[40] := 559; y[41] := 603;
    y[42] := 627; y[43] := 612; y[44] := 548; y[45] := 480; y[46] := 385; y[47] := 428;
    y[48] := 307; y[49] := 273; y[50] := 334; y[51] := 390; y[52] := 415; y[53] := 453;
    y[54] := 450; y[55] := 479; y[56] := 420; y[57] := 387; y[58] := 381; y[59] := 414;
    y[60] := 335; y[61] := 326;
    /// Общие настройки ///
    //Период расчета
    cens.ModelPeriod.FirstPoint := 1;
    cens.ModelPeriod.LastPoint := 62;
    //Выбор объясняемой переменной
    cens.Serie.Value := y;
    //Кварталы или месяцы
    cens.SeasonalComponentCycleType := SeasonalityCycleType.sctMonth;
    cens.StartPeriod.MonthOrQuarter := 2;
    cens.StartPeriod.Year := 2000;
    /// Настройки сезонности ///
    //Тип сезонности
    cens.SeasonalAdjustmentMode := SeasonalityTypeX12.stx12Additive;
    //Сезонный фильтр
    cens.SeasonalFilter := SeasonalFilterType.sftAuto;
    /// Поправки на рабочие дни и праздники ///
    cens.AdjustmentOptions := AdjustmentOptionsX12Type.aox12tArimaStep;
    // Поправка на рабочие дни
    cens.TradingDayEffects := TradingDayEffectsX12Type.tdex12tTd;
    // Поправка на праздничные дни
    cens.Easter.IsActive := True;
    cens.Easter.Day := 8;
    cens.Labor.IsActive := True;
    cens.Labor.Day := 1;
    cens.Thanksgiving.IsActive := True;
    cens.Thanksgiving.Day := 2;
    cens.Sceaster.IsActive := False;
    /// Выбросы ///
    outlier := cens.OutliersARIMAtc.Add();
    outlier.Year := 2004;
    outlier.MonthOrQuarter := 2;
    outlier := cens.OutliersARIMArpbegin.Add();
    outlier.Year := 2002;
    outlier.MonthOrQuarter := 1;
    outlier := cens.OutliersARIMArpend.Add();
    outlier.Year := 2002;
    outlier.MonthOrQuarter := 5;
    /// Диагностика /// 
    // Анализ стабильности сезонных компонент
    cens.StabilityAnalysisofSeasonals := StabilityAnalysisofSeasonalsX12Type.sasx12tNone;
    //Прочее
    cens.SpectralPlots := True;
    /// Рассчет модели ///
    res := cens.Execute();
    System.Diagnostics.Debug.WriteLine(cens.Errors);
    Warnings := cens.Warnings;
    For i := 0 To cens.WarningsCount - 1 Do
        System.Diagnostics.Debug.WriteLine(Warnings[i]);
    End For;
    If (res = 0) Then
        System.Diagnostics.Debug.WriteLine("=== Поправки на праздничные дни ===");
        System.Diagnostics.Debug.Indent();
        CombHFactors := cens.CombinedHolidayFactors;
        For i := 0 To cens.CombinedHolidayFactors.Length - 1 Do
            System.Diagnostics.Debug.WriteLine(CombHFactors[i]);
        End For;
        System.Diagnostics.Debug.Unindent();
        System.Diagnostics.Debug.WriteLine("=== Спектральные частоты SP1 ===");
        System.Diagnostics.Debug.Indent();
        SP1F := cens.SP1frequency;
        For i := 0 To cens.SP1frequency.Length - 1 Do
            System.Diagnostics.Debug.WriteLine(SP1F[i]);
        End For;
        System.Diagnostics.Debug.Unindent();
        System.Diagnostics.Debug.WriteLine("=== Спектральные плотности SP1 ===");
        System.Diagnostics.Debug.Indent();
        SP1S := cens.SP1spectr;
        For i := 0 To cens.SP1spectr.Length - 1 Do
            System.Diagnostics.Debug.WriteLine(SP1S[i]);
        End For;
        System.Diagnostics.Debug.Unindent();
    End If;
End Sub;

См. также:

ISmx12arima