Я пытаюсь преобразовать задачу оптимизации из Excel в R, но не могу понять, как кодировать в R.
Я решил эту проблему в Excel с помощью нелинейного решателя. Я хотел бы найти набор х, которые обеспечивают сумму наименьшего значения диффузии из набора данного значения, у. минимизировать (x-y) ^ 2 и ограничения: x> = A, x> = By. Из-за ограничения ограничений в Excel, я пытаюсь писать в R, но не знаю, как настроить целевую функцию.
Y <- C(10,40,10,20)
find the X that give MIN sum of (X-Y)^2.
Subject to;
X_1 + X_3 >= 50
X_2 + X_4 >= 50
X_1 + X_2 >= 40
X_3 + X_4 >= 60
solve for all four X value.
Нелинейный Солвер в Excel дает решение как X_1 = 15, X_2 = 25, X_3 = 35, X_4 = 25