Линейная программа транспортировки с переменными ограничениями поставок в R
Я пытаюсь настроить программу, которая решает проблему транспорта с дисбалансом в форме:
Maximize x11+x12+x13+x14+x21+x23+x24
ST:
Supply:
x_11+x_12+x_13+x_14 <= 50
X_21+x_22+x_23+x_24 <= 100
Demand
25 * Y_1 + 10 * Y_2 -X_12 - X_21 = 0
30 * Y_2 + 20 * Y_3 -X_22 - X_22 = 0
etc for for column constraint
ST:
X_ij>=0
Y_1+Y_2 =1
Y_2+Y_3 =1 (etc)
Есть ли пакет, который может помочь мне решить такую проблему? Особенно ограничения Y+Y=1, поскольку они являются еще одним набором переменных для оптимизации? Ограничения спроса должны иметь вторую переменную, в этом случае Y для решения проблем. Я пытаюсь решить эту проблему, а затем записать ответы в таблицу.
Спасибо