第6讲 优化软件LinGo的使用.pptVIP

@OLE ：与EXCEL连接 MODEL: SETS: MYSET: COST,SHIP,NEED,SUPPLY; ENDSETS MIN = @SUM( MYSET( I): SHIP( I) * COST( I)); @FOR( MYSET( I): [CON1] SHIP( I) NEED( I); [CON2] SHIP( I) SUPPLY( I)); DATA: MYSET =@OLE(D:\JXIE\BJ2004MCM\mydata.xls,CITIES); COST,NEED,SUPPLY =@OLE(mydata.xls); @OLE(mydata.xls,SOLUTION)=SHIP; ENDDATA END mydata.xls文件中必须有下列名称(及数据)： CITIES， COST，NEED，SUPPLY，SOLUTION 在EXCEL中还可以通过“宏”自动调用LINGO(略) 也可以将EXCEL表格嵌入到LINGO模型中(略) @ODBC ：与数据库连接 输入基本集合元素： setname/@ODBC([‘datasource’ [, ‘tablename’ [, ‘columnname’]]])/ 输入派生集合元素： setname/@ODBC([‘source’[,‘table’ [, ‘column1’[, ‘column2’…]]]])/ 目前支持下列DBMS: (如为其他数据库，则需自行安装驱动) ACCESS， DBASE，EXCEL，FOXPRO，ORACLE， PARADOX，SQL SERVER， TEXE FILES 使用数据库之前，数据源需要在ODBC管理器注册 输入数据： Attr_list=@ODBC([‘source’[,‘table’ [, ‘column1’[, ‘column2’…]]]]) 输出数据： @ODBC([‘source’[,‘table’ [, ‘column1’[, ‘column2’…]]]])= Attr_list 具体例子略 Excel与Lingo数据交换 Lingo运算求解设置 4. 建模与求解实例（结合软件使用） 问题1. 如何下料最节省 ? 例 钢管下料 问题2. 客户增加需求： 原料钢管:每根19米 4米50根 6米20根 8米15根 客户需求 节省的标准是什么？ 由于采用不同切割模式太多，会增加生产和管理成本，规定切割模式不能超过3种。如何下料最节省？ 5米10根 按照客户需要在一根原料钢管上安排切割的一种组合。 切割模式 余料1米 4米1根 6米1根 8米1根 余料3米 4米1根 6米1根 6米1根 合理切割模式的余料应小于客户需要钢管的最小尺寸 余料3米 8米1根 8米1根 钢管下料 为满足客户需要，按照哪些种合理模式，每种模式切割多少根原料钢管，最为节省？ 合理切割模式 2. 所用原料钢管总根数最少 模式? 4米钢管根数 6米钢管根数 8米钢管根数 余料(米) 1 4 0 0 3 2 3 1 0 1 3 2 0 1 3 4 1 2 0 3 5 1 1 1 1 6 0 3 0 1 7 0 0 2 3 钢管下料问题1 两种标准 1. 原料钢管剩余总余量最小 xi ~按第i 种模式切割的原料钢管根数(i=1,2,…7) 约束 满足需求 决策变量 目标1（总余量） 按模式2切割12根,按模式5切割15根，余料27米 模 式 4米 根数 6米 根数 8米 根数 余 料 1 4 0 0 3 2 3 1 0 1 3 2 0 1 3 4 1 2 0 3 5 1 1 1 1 6 0 3 0 1 7 0 0 2 3 需 求 50 20 15 最优解：x2=12, x5=15, 其余为0； 最优值：27 整数约束： xi 为整数 当余料没有用处时，通常以总根数最少为目标 目标2（总根数） 钢管下料问题1 约束条件不变 最优解：x2=15, x5=5, x7=5, 其余为0； 最优值：25。 xi 为整数 按模式2切割15根，按模式5切割5根，按模式7切割5根，共25根，余料35米 虽余料增加8米，但减少了2根 与目标1的结果“共切割27根，余料27米” 相比 钢管下料问题2 对大规模问题，用模型的约束条件界定合理模式 增加一种需求：5米10根；切割模式不超过3种。