- 在线时间
- 1630 小时
- 最后登录
- 2024-1-29
- 注册时间
- 2017-5-16
- 听众数
- 82
- 收听数
- 1
- 能力
- 120 分
- 体力
- 557689 点
- 威望
- 12 点
- 阅读权限
- 255
- 积分
- 172680
- 相册
- 1
- 日志
- 0
- 记录
- 0
- 帖子
- 5313
- 主题
- 5273
- 精华
- 18
- 分享
- 0
- 好友
- 163
TA的每日心情 | 开心 2021-8-11 17:59 |
---|
签到天数: 17 天 [LV.4]偶尔看看III 网络挑战赛参赛者 网络挑战赛参赛者 - 自我介绍
- 本人女,毕业于内蒙古科技大学,担任文职专业,毕业专业英语。
 群组: 2018美赛大象算法课程 群组: 2018美赛护航培训课程 群组: 2019年 数学中国站长建 群组: 2019年数据分析师课程 群组: 2018年大象老师国赛优 |
2-7、规划问题的Lingo解法# B* m4 A) S* J
一、 从规划问题引入
6 @! U0 u& U8 o7 _( O9 D4 K9 e8 w1 w) }& @
在我们学习探索的各个领域,规划问题都是无处不在的。通过列出约束条件及目标函数,再画出约束条件所表示的可行域,就能在可行域内求得目标函数的最优解以及最优值。当然我们在高中就已经学习过线性规划的相关知识,对于理科同学来说,大多数同学应该感觉难度不大,或者说是送分考点。然而到了大学阶段,一些规划问题的求解已经不是人力可以轻松算出来的了,必须借助于计算机来进行计算。那么对于规划问题的软件选择,又应当如何进行呢?
8 z+ z, o! H7 y0 s/ O$ I5 B8 p z
9 {, ]7 m# E$ r" h2 Z z8 b二、 软件分析与选择! Q/ K: B) s1 p5 v* m: U
5 [! r/ p! I: X/ _
Matlab相比之下是一个面面俱到的编程软件,也可用于求解规划问题。但是如果一定要去和某些“针对特定功能而开发的软件”去比的话,Matlab有时也会稍显逊色。就好比一款顶级的耳机能通吃高中低音,但是去和另一款顶级的为高音而设计的耳机去比较的话,也难免会被比下去。这也就是为什么在规划问题上,很多人会去使用Lingo进行求解。1 ?! v1 q! Z* i% _+ a
c5 ^# n F$ K: j; M/ f2 u+ B0 e 首先我们来区分一下Lindo和Lingo这两款软件。Lingo是在Lindo基础之上做成的软件,处理解线性规划问题之外还加了非线性的求解器,更关键的是还追加了集的概念。可以更方便的解决复杂的问题。所以本文只对Lingo进行讲解。 % ^ k. X |) Z6 `3 o
而对于Matlab与Lingo的区别,就好比手动挡与自动挡的区别,有针对性的专业软件会对用户做很多的优化。这里引用知乎上大佬 花开花落 的回答
- t6 w& {* l" Chttps://www.zhihu.com/question/49319704/answer/165923451* x8 U& {1 U9 L+ i
3 z- e' K3 o, K F7 j
用MATLAB求解线性规划和整数规划问题,需要先将问题转化成如下标准型,其中X只能是向量,也就是单下标变量,然后用向量和矩阵来表达目标函数和约束条件。 9 X: o. O- \) Z6 [3 V: S- y; f
然而,许多问题(如指派问题和运输问题)由于参数和决策变量是双下标变量,必须在基本的数学模型的基础上进行变换才能求解,这样得到的等式约束和不等式约束的系数矩阵规模就非常庞大,当然由MATLAB计算问题不大,但转换工作完全要由人工完成,工作量大而且容易出错,因此在这一块效率不高。
. O; x$ r, `$ z* d8 W0 l* { 而LINGO有自己的建模语言,在建立了集合的基础上,能够高效表达目标函数和各种约束条件。所写的模型基本上可以看作是对数学模型的翻译,不需要太多的转换。( |* y+ m4 m$ d
, q/ m$ K' T7 I# [* t 那么现在我们基本上对LINGO和MATLAB对规划问题的处理方面有了初步认识与了解,至于是执着于MATLAB还是选择开辟LINGO这片新的领域,取决于队伍自身了。
x% w" ?' n5 D0 i/ f4 P/ w$ R% {: U: H4 S6 j5 L3 M2 q
三、 如何上手Lingo% p; W/ G; A* F) ^! ?
+ P5 ^4 h' S/ x4 g. [ 有很多人对于Lingo的评价都是,非常简单的软件,很好上手。
/ V! N0 }. R- ?% d4 }! i5 H “简单”一词我觉得还比较恰当。Lingo的各种版本几乎全部都是免安装版本的,界面很简单,功能用法很简单,处理问题的方式简单快捷。确实是跟“简单”一词挂钩的。但是任何一款软件想要精通,都是有一定难度的。如果你只需要用Lingo处理一些简单的线性问题,那么2个小时不到,0编程基础的朋友就能上手。如果你认准了Lingo就是你处理各类规划问题的御用软件,那么还是有很长一段路要走的。当然这也取决于用户的编程基础。如果学习过面向对象的程序设计课程的朋友,对于类与对象概念有所了解,那么对于集这一概念也能快速理解上手,学习起来更加轻松。
( |+ H9 j2 k! N/ `; b% H/ M b& o3 q9 s! E; z# R5 Q
四、 Lingo的基本语法规则
$ L. W/ G* K7 H y2 N9 _' g- k% H7 X9 e
1、求目标函数的最大最小值用 MAX=MAX= 和 MIN=MIN= 来表示; 6 |, o9 Y' O4 d+ z. W
2、每个语句必须用分号“;”结束,每行可以有许多语句,一个语句可以跨行;
) \2 K2 ^& e7 t3、变量名必须以字母A-Z开头,由字母、数字0-9和下划线组成,长度不超过32个字符,不区分大小写;
9 N, R- g0 p; b8 Z1 q4、可以给语句加上标号;
0 N8 S9 I! b+ @! C1 o! v( k5、注释以“!”开头以“;”结束;
2 @5 S3 M# a% O2 |/ t6、默认所有的决策变量为非负数; / H% N, f% w0 D [1 Z/ V- ~! N
7、Lingo模型以“MODEL”开头以“END”结束。
" ~& x6 T1 G2 ]8、Lingo把相联系的对象聚合成集,借助集,就能够用一个单一的长的简明的公式表示一系列相应的约束。 6 w( _3 m+ j, ~/ W' m, ]7 J' c$ w
9、Lingo程序会包含集合段,数据输入段,优化目标和约束段,初始段和数据预处理部分。
& r: {& {1 l2 M( ^10、Lingo函数包括有数学函数,金融函数,概率函数,变量界定义函数,集操作函数,集循环函数,输入输出函数,辅助函数等等。# O" o9 Y0 b, p; Z$ i8 q- w" d
- _8 O) N: x$ V* U; R: s7 X
五、 谈一谈例子
% u3 P: `1 ^9 e/ z; O# q' Y
" E1 C$ W2 D0 ]$ P 那么Lingo用起来到底有多简单呢,我们来看一个例子。" ~# w0 j* y6 T, w- n+ ]$ N! f2 T
) c3 y3 \+ E c, D0 f$ a/ L例1:某家公诉制造书桌、餐桌和椅子,所用的资源有三种:木料、木工和漆工。生产数据如下表所示:( Y) B4 q6 U- K" t7 }2 g1 Y9 w
& m9 ~& D# Z5 \0 z3 p 每个书桌 每个餐桌 每个椅子 现有资源总数
( `2 _! b$ [! r+ I木料 8个单位 6个单位 1个单位 48个单位& c9 B) K, H; [' u/ @
漆工 4个单位 2个单位 1.5个单位 20个单位" c, N& q: E) |
木工 2个单位 1.5个单位 0.5个单位 8个单位
, u- g/ D) J5 P% x- |9 g成品单价 60个单位 30个单位 20个单位 7 `% ]4 n0 a* t4 d- q. z
若要求桌子的生产量不超过5件,如何安排三种产品的生产可使利润最大?
4 t* p% F4 c% ?% P2 }0 G8 a2 U5 q2 {6 } F
解:代码$ w/ o/ Q- Z, m/ b
% p$ z! Y; v) M8 U8 ]: pmax = 60 * desks + 30 * tables + 20 * chairs;$ C6 {/ l Z: I5 f( V3 C! H
8 * desks + 6 * tables + chairs <= 48;- j6 K" o# {* ~7 W" U& X
4 * desks + 2 * tables + 1.5 * chairs <= 20;
$ w/ _- k0 X$ u$ C 2 * desks + 1.5 * tables + .5 * chairs <= 8;$ @: s/ L) M* d' i* i! O: H
tables <= 5;
5 O6 Y2 p+ n; y$ r! V! }1
4 C* z% [5 T! r `9 w1 L23 \& i; P; ?8 W4 k# v! h, ]$ b( g
3
) g! M" T3 h/ \4) n8 l6 x$ ^. J( y8 Q
5) K9 P& n# a/ M7 B! P
可以得到结果:
' z9 y2 K. P! |, R9 z
. e1 W4 Q8 J9 I+ g: T9 v0 c. w 这里的 Total solver iteration 表示一共迭代2次得到最优解。 # V. N: \( N ]0 {- d
Objective value 表示最优值为280,而取280的时候各个变量取多少呢,底下的表格给出了答案。
1 D1 q- o) h* g! e7 g 可以看到,没有定义变量,简简单单一个函数一个约束条件,迅速计算出了答案。Lingo看上去就像是为了非编程人员量身定制的一样。! l* x% p y) D$ u) P7 R
: [1 E$ Q/ h1 j( O
例2:给定一个直角三角形,求包含该三角形的最小正方形。9 P& z% B# u5 s9 ^. I
# m: F+ \. h! T8 X' k$ l; I$ R
我们可以作出如下正方形:
, g' R! o2 v$ [4 i3 E/ t5 G# o/ K
$ J k# G3 ^/ v1 y% A$ N" r) W3 j- \! P4 a' S% w9 p9 _
CE=asinx,AD=bcosx,DE=acosx+bsinxCE=asinx,AD=bcosx,DE=acosx+bsinx
3 ]4 P/ K; J( o 转化为了规划问题那么正方形面积最小的时候即为最优解。
% j4 ?# I' B3 l0 p* i, D 代码:, G! T1 N5 i' @! X! Q. a
$ t/ j* T+ s5 J% C* b3 |! umodel:
. p) d) ^6 g" l* Fsets:4 K! R0 I' R$ z I4 a# T- v
object/1..3/:f;6 X _8 @- A1 e- Z
endsets. r$ Z" p7 k; D& p5 U
data:
( c$ D$ Y: t( i a, b = 3, 4;! y' v7 j3 Z- k; o2 Q K
enddata
; t2 T1 T% |8 R' n \7 c f(1) = a * @sin(x);" z- V5 m Q1 u- _
f(2) = b * @cos(x);
, ]6 ^6 j/ l* P4 h! d* B/ y) ^ f(3) = a * @cos(x) + b * @sin(x);
' C; C) c$ f8 e6 w$ u min = @smax(f(1), f(2), f(3));
0 ?, v9 s m4 N @bnd(0, x, 1.57);
$ Z. Q6 s* R: @# M8 D8 y( Mend* ]2 Y2 h8 ^& Q; C+ ~
1
3 N+ j( H# p# L) x% W22 D- ]0 r7 o- o3 B& i, s
3
. K2 U( V/ W- U* ^+ ~4
, B! M3 p- c0 P6 k6 }4 ^& v59 Y/ R9 }' `" f) K* C7 ^
6. u7 D) `' z$ [" j. ~
7
3 t/ t' ?5 z! R+ p; Z& Y& }3 n8; f6 Y! P0 {2 y- A9 S, t" s
9
1 |# ^3 Z# |3 G103 R( j) M: I& H, m$ b3 F
11
# J* C( [% W, o; N& K9 z127 D5 h4 ^8 b2 [7 V% B6 ~
13. B) V9 l3 c1 V& z: G, p2 O5 |9 \+ \% f
得到结果:
9 a" A% D/ t- p2 e9 Q( h
2 a0 E: N" R7 r; P$ |
* T! S5 R, \3 U9 m# u 这里需要注意,lingo中如果没有代码说明,是默认 xx 的值大于0的。代码中用 bndbnd 函数限制了 xx 的范围。/ _$ |% ]! |2 x" M. g/ k
那么再进阶一下,Lingo在处理TSP问题的时候表现如何呢?
8 [2 N& M* a9 y0 G) w2 k" o7 T7 v. W, X: ? g
例3: 现需在一台机器上加工 nn 个零件(如烧瓷器),这些零件可按任意先后顺序在机器上加工。我们希望加工完成所有零件的总时间尽可能少。由于加工工艺的要求,加工零件 jj 时机器必须处于相应状态 sjsj(如炉温)。设起始未加工任何零件时机器处于状态 s0s0 ,且当所有零件加工完成后需恢复到 s0s0 状态。已知从状态 sisi 调整到状态 sj(j≠i)sj(j≠i) 需要时间 cijcij 零件 jj 本身加工时间为 pjpj。为方便起见,引入一个虚零件 00,其加工时间为 00,要求状态为 s0s0,则 0,1,2,…,n0,1,2,…,n 的一个圈置换 ππ 就表示对所有零件的一个加工顺序,在此置换下,完成所有加工所需要的总时间为
; n, I# e* j3 e6 P1 p% c∑i=0n(ciπ(i)+piπ(i))=∑i=0nciπ(i)+∑j=0npj
T# X1 D' F2 c j# n1 S0 i' [8 T∑i=0n(ciπ(i)+piπ(i))=∑i=0nciπ(i)+∑j=0npj
8 j% ?8 u# Y! G2 r, K2 R( ^6 `由于 ∑nj=0pj∑j=0npj 是一个常数,故该零件的加工顺序问题变成TSP。
/ T5 e8 E* f* H7 g
& g4 w/ @' }( Y& H代码: c& U0 E+ a1 W1 ~! x2 Z0 ]
! q7 | x- w) \8 K5 k9 M2 G$ K
!旅行商问题;
7 I7 ~, z' ?! Q4 P6 amodel:
. Z+ ?8 E! ?. y, h- W/ T( Isets:* _) W1 p, B, ^. n/ ?7 n R
city / 1.. 5/: u;- K" g- }2 Z5 ]9 e
link(city, city):, |# U( E1 f) t8 I) X9 g2 A- E6 E
dist, x; !距离矩阵;
k' i* m$ E8 b6 h+ l' Iendsets& M. \, b8 D. |+ s5 D' ]
n = @size(city);" f9 C+ y0 K4 M$ Z7 K2 N$ ?6 }
data: !距离矩阵,它并不需要是对称的;5 r9 H$ ?) z3 o# h
dist = @qrand(1); !随机产生,这里可改为你要解决的问题的数据;7 |5 e: c* p. \
enddata
1 t1 `: h" b$ E7 V- u% _ min = @sum(link:dist * x);: I8 d f2 _6 Y' y" G
@FOR(city(K):
7 m5 F; Q& Q7 r: ? @sum(city(I)|I #ne# K: x(I, K)) = 1;: P/ a% z; Q1 A) O
!进入城市K;1 c: Z+ v' x/ ]1 i
@sum(city(J)|J #ne# K: x(K, J)) = 1;
! F0 g8 U* {1 l. M9 [5 J" I );
5 w! X2 r6 {0 O) ?( ~; q+ C# T, i @for(city(I)|I #gt# 1:
: t0 F5 ^- s9 q @for(city( J)| J#gt#1 #and# I #ne# J:0 e# I3 S: T/ U: k, P$ t* E% i
u(I) - u(J) + n * x(I,J) <= n - 1);. s* w0 W7 u I& F
);' g4 ^ m' m7 u1 _* G1 W
@for(city(I)|I #gt# 1: u(I) <= n - 2);
% G' J5 b, }! u$ u2 y@for(link: @bin(x));
; I0 y& R! X) S3 V, [/ q* y9 t+ Tend8 Y1 i! [; D. ]
1) B# k& M. K1 {
2
$ X9 Y9 f8 U/ q% D8 }0 a2 s/ F* w f. b3; G' {3 W1 Z# g x
49 |! i5 a: ^, W& m
5
% o! _- e7 Z( ?. B, Q: }4 b; N6
1 \3 ~! [$ p( j) N5 t: R' @- M7
- {# W% N1 `) h/ j& X) q* s$ E86 i& ]8 f! B* I
9
: p s+ k/ x4 V9 b& V' }104 G9 O R H' O; F" J
11; J, P% R0 `3 y% X6 E9 J/ B) p: c
12 i+ |5 X& d! Z: m3 d. G O; _, u! d
13' U4 ~5 A4 `& u) ^. e
14
8 b6 d, _- y, W& P* f$ l3 a156 D4 t. ?* @9 Z0 p9 f) i% `
16
( G) ~, m! B, f m1 c: m4 O17
3 ]8 ]$ m4 ~# P) T8 z8 S, a) j18
# ?% s) Q$ A2 k4 N. B2 l19
; |# |. n# }& O5 Y9 u# T# _20
' f7 n3 V6 T7 L6 n7 t' z21 g! d+ {5 r) A; o4 p. N1 [
22
" x9 P6 s2 T3 j5 A23
8 r O: `2 Q$ Q24
6 c! _# i7 H# e& L可以得到结果:
9 d- M# w0 ]6 @7 n0 q0 V: l$ ^' o( Q# F8 H" s1 m8 Y: ?: F
---------------------
" @! J3 z/ B k9 T& B' h0 e: J- _
" Q5 e+ c7 w" ]* z) p9 c# s
" S# }7 z6 n) ?* m
) }$ V Y# t }% _6 U) G, v6 X2 |0 b
/ J& G2 z4 z4 H6 V x/ {1 E |
zan
|