IMsBinaryRegressionTransform.IsCoefficientsSaved

Syntax

IsCoefficientsSaved(Coord: IMsFormulaTransformCoord): Boolean;

Parameters

Coord. Output variable slice, for which calculation is executed.

Description

The IsCoefficientsSaved property returns True if model coefficients are saved.

Example

Executing the example requires that the modeling container with the CONT_MODEL identifier includes a model with the BinReg identifier using binary regression method for calculation.

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

Model: IMsModel;

Trans: IMsFormulaTransform;

VarTrans: IMsFormulaTransformVariable;

Tree: IMsFormulaTransformSlicesTree;

Slice: IMsFormulaTransformSlice;

Selector: IMsFormulaTransformSelector;

Formula: IMsFormula;

Binary: IMsBinaryRegressionTransform;

Calc: IMsModelCalculation;

Coord: IMsFormulaTransformCoord;

Coef: Array Of Double;

i: Integer;

Begin

MB := MetabaseClass.Active;

MObj := MB.ItemByIdNamespace("BinReg", MB.ItemById("CONT_MODEL").Key).Edit;

Model := MObj As IMsModel;

Trans := Model.Transform;

VarTrans := Trans.Outputs.Item(0);

Tree := VarTrans.SlicesTree(VarTrans);

Slice := Tree.CreateSlice(1);

Selector := Model.Transform.CreateSelector;

Selector.Slice := Slice;

Formula := Model.Transform.Transform(Selector);

Binary := Formula.Method As IMsBinaryRegressionTransform;

Binary.HasConstant := True;

Calc := Model.CreateCalculation;

Calc.Period.IdentificationStartDate := DateTime.ComposeDay(2000, 01, 01);

Calc.Period.IdentificationEndDate := DateTime.ComposeDay(2006, 12, 31);

Calc.Period.ForecastStartDate := DateTime.ComposeDay(2007, 01, 01);

Calc.Period.ForecastEndDate := DateTime.ComposeDay(2010, 12, 31);

Coord := Trans.CreateCoord(VarTrans);

//identification of new equation

Binary.Identify(Calc As IMsMethodCalculation, Coord);

//receive the calculated coefficients

Coef := Binary.Coefficients(Coord);

//save if it is not saved

If Not Binary.IsCoefficientsSaved(Coord) Then

Binary.Coefficients(Coord) := Coef;

End If;

//display into the console

For i := 0 To Coef.Length - 1 Do

Debug.WriteLine(Coef[i]);

End For;

MObj.Save;

End Sub Main;

After executing the example the model parameters are modified, and new equation coefficients are calculated. Unsaved coefficient values are saved and displayed in the console window.