UseR: Boolean;
UseR: boolean;
Свойство UseR определяет, используется ли при расчете метода подключение к R.
Для получения информации о том, возможен ли расчет метода с помощью R, используйте свойство IMsMethod.SupportsR.
Возможные значения UseR:
True. Метод рассчитывается с помощью R. Для этого в репозитории должна быть настроена интеграция с R. Подробнее о том, как можно настроить интеграцию вы можете узнать в разделе «Как настроить интеграцию с R?»;
False. Метод рассчитывается с помощью «Форсайт. Аналитическая платформа».
Для выполнения примера в репозитории предполагается наличие контейнера моделирования с идентификатором «MS», содержащим модель с идентификатором «MODEL_R». В репозитории должна быть настроена интеграция с R. Подробнее о том, как можно настроить интеграцию вы можете узнать в разделе «Как настроить интеграцию с R?».
Добавьте ссылки на системные сборки: Metabase, Ms.
Sub UserProc;
Var
mb: IMetabase;
msKey: Integer;
modelObj: IMetabaseObject;
transf: IMsFormulaTransform;
formula: IMsFormula;
method: IMsMethod;
Begin
// Получаем репозиторий
mb := MetabaseClass.Active;
// Получаем ключ контейнера моделирования
msKey := mb.GetObjectKeyById("MS");
// Получаем модель
modelObj := mb.ItemByIdNamespace("MODEL_R", msKey).Edit;
// Получаем параметры расчета модели
transf := (modelObj As IMsModel).Transform;
formula := transf.FormulaItem(0);
method := formula.Method;
// Проверяем, доступен ли расчет модели с помощью пакета R
If method.SupportsR
Then
method.UseR := True;
Debug.WriteLine("При расчете модели будет использоваться подключение R");
Else
Debug.WriteLine("Модель не поддерживает расчет с помощью R");
End If;
// Сохраняем изменения
modelObj.Save;
End Sub UserProc;
В результате выполнения примера модель будет рассчитана с помощью R. Если модель не поддерживает расчет с помощью R, то в окно консоли будет выведено соответствующее сообщение.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Public Shared Sub Main(Params: StartParams);
Var
mb: IMetabase;
msKey: uinteger;
modelObj: IMetabaseObject;
transf: IMsFormulaTransform;
formula: IMsFormula;
method: IMsMethod;
Begin
// Получаем репозиторий
mb := Params.Metabase;
// Получаем ключ контейнера моделирования
msKey := mb.GetObjectKeyById("MS");
// Получаем модель
modelObj := mb.ItemByIdNamespace["MODEL_R", msKey].Edit();
// Получаем параметры расчета модели
transf := (modelObj As IMsModel).Transform;
formula := transf.FormulaItem[0];
method := formula.Method;
// Проверяем, доступен ли расчет модели с помощью пакета R
If method.SupportsR
Then
method.UseR := True;
System.Diagnostics.Debug.WriteLine("При расчете модели будет использоваться подключение R");
Else
System.Diagnostics.Debug.WriteLine("Модель не поддерживает расчет с помощью R");
End If;
// Сохраняем изменения
modelObj.Save();
End Sub;
См. также: