lpmethod.r.
＃版权所有2018，Gurobi优化狗万app足彩，LLC ##解决方法参数的不同值;＃显示哪个值提供最短的解决时间。库（Matrix）库（Gurobi）args < - commandargs（trailingonly = true）if（length（args）<1）{stop（'用法：rscript lpmethod.r filename \ n'）}＃读取模型cat（'阅读模型'，args [1]，'...'）模型< - gurobi_read（args [1]）cat（'...完成\ n'）＃用不同的方法params < - list（）besttime的不同值解决模型< - inf bestmethod < - -1 for（i在0：4中）{params$方法< - i res < - gurobi（型号，params）if（res$status =='最佳'）{bestmethod < - i besttime < - res$运行时参数$timelimit < - besttime}}＃报告如果（bestmethod == -1）{cat（'无法解决此模型\ n'）}} else {cat（'解决'，besttime，'秒，使用方法'，BESTMETHOD，'\ n'）} RM（params，model）
