Автоматизировать создание переменных после smbinning

[AnnaK]

В результате применения некоей функции smbinning получаем result класса "character". Result$ivtable для train$VAR_229 имеет такой вид:
Cutpoint CntRec CntGood CntBad CntCumRec CntCumGood CntCumBad PctRec GoodRate
1 <= 1 29375 656 28719 29375 656 28719 0.9264 0.0223
2 <= 999 2335 125 2210 31710 781 30929 0.0736 0.0535
3 Missing 0 0 0 31710 781 30929 0.0000 NaN
4 Total 31710 781 30929 NA NA NA 1.0000 0.0246
BadRate Odds LnOdds WoE IV
1 0.9777 0.0228 -3.7792 -0.1003 0.0089
2 0.9465 0.0566 -2.8724 0.8064 0.0714
3 NaN NaN NaN NaN NaN
4 0.9754 0.0253 -3.6789 0.0000 0.0803

Дальше создаю новые дата фреймы двух типов с такими переменными:
as.factor(ifelse(train$VAR_229<= 1 ,'<= 1 ', '<= 999' ))
(Ограничения из столбца Cutpoint.)

ifelse(train$VAR_229<= 1,-0.1003,0.8064) - Значения из столбца WoE

Таких переменных VAR больше 900. Можно ли создать цикл (брать ограничения из Cutpoint или создавать форматы)? Даже не предполагаю, с чего начать.