Используя фрейм данных спроса и значение для максимального количества партий и максимального количества сборщиков, я создал переменную функции For L oop для создания объективной функции. Нижеприведенное для l oop дает мне результат, но для его выполнения требуется много времени из-за того, что кадр данных спроса и значение максимальной партии и максимального выбора являются большими.
Я хочу векторизовать операции для l oop, чтобы сократить время выполнения, и для этого требуется какой-то ввод? Ниже приведено значение For L oop вместе со значениями.
max_batch = 10
max_picker = 12
ncol (df_demand) = 30, nrow (df_demand) = 30
hold <- 'Minimize \n \nobj:'
for(k in 1:max_batch) {
for(q in 1:(ncol(df_demand)-1)) {
for(i in 1:nrow(df_demand)) {
for(e in 1:max_pickers) {
test <- paste0(hold,'Labelset(',i,')(',q,')(',k,')(',e,')',' ','Earlytime(',i,')(',q,') + ')
}
}
}