【讨论】新手求助：关于lingo的wrap函数

Super_xu

不错，不错。。。

吴楚

该函数返回j=index-k*limit，其中k 是一个整数，取适当值保证j 落在区间[1，limit]内。该函数相当于index 模limit 再加1。该函数在循环、多阶段计划编制中特别有用。

& L' p' O4 v% Q9 J' W' I' m通俗的解释是：用来转换集合两端的索引，在集合的另一端继续索引。也就是说，在集合循环函数中，当达到集合的最后（或第一个）成员后，可以用@WRAP函数把索引转到集合的第一个（或最后一个）成员。在数学上@WRAP(I,N)的返回值当I位于区间[1,N]内时返回I，否则返回J=I-N*K,K为整数，且J位于区间[I,N]内。如@WRAP(3,10)返回值为3， @WRAP(35,10)返回值为5， @WRAP(40,8)返回值为8, @WRAP(9,7)返回值为2.

) `; g0 U' K, C0 ^% N( u@for(days(J):
2 E1 a3 y( r( S% K9 g6 k; N8 B4 o    @sum(days(I) | I #le# 5:
! d1 O: C( S6 R, N  z      start(@wrap(J+I+2,7))) >= required(J));
3 W( v9 L+ \$ I  ~0 Qday(I)=1,2,3,4,5不变（因为每个人都要连续工作5天，这里的脚码表示取值的顺序，并不是返回值）。当day(J)为1时，由于7为循环周期，故@warp(J+I+2)返回的值是4，5，6，7，1的职员和；当day(J)为2时，@warp(J+I+2)返回的值是5，6，7，1，2的职员和，以此类推。

刘振

model:
8 f! Y! j0 Z& [; a- f+ G9 W4 Esets:
, c8 R- g2 ?5 T% T& c  f$ Q8 Zdays/mon..sun/: required,start;
endsets
7 q/ N4 @3 `/ D, i, c6 K2 fdata:
+ k/ X6 o0 D9 `: t+ y$ V& Q!每天所需的最少职员数;
required = 20 16 13 16 19 14 12;
enddata
!最小化每周所需职员数;
2 i) M. {4 X+ Fmin=@sum(days: start);
@for(days(J):
& m: U; O/ U, B9 m6 k4 T3 }% F. ^+ r    @sum(days(I) | I #le# 5:
: F6 ], O$ E7 C! ?/ b2 A0 ^5 f      start(@wrap(J+I+2,7))) >= required(J));
9 ]) \3 h( t2 U9 J3 K" pend

  B+ A/ t" j* j6 w: b6 D解释下：
* j* Z7 I  i6 X* Y: a@for(days(J):
$ B3 r8 j2 r( U7 K    @sum(days(I) | I #le# 5:
& C0 v5 ~* V! b& w2 {      start(@wrap(J+I+2,7))) >= required(J));

: S" r, g! @4 k- a当day(J)为1时，day(I)=1,2,3,4,5.由于7为循环周期，故@warp(J+I+2)返回的值是4，5，6，7，1的职员和.当day(J)为2时，@warp(J+I+2)返回的值是5，6，7，1，2的职员和，以此类推。
" K; O7 q$ k0 O( v& U
- R3 s7 h" P4 O+ @7 k( z网上有一种说法是，英美中星期表示的不同，中国将星期一看成第一天，而国外则是将星期日看成第一天。在lingo中sun就表示第一天，用数字0标识。因此@wrap（index,limit）的用法就是index模limit再加1。将上面的程序中的集修改为
; F9 F8 F) m% t: z
) I+ _4 Z+ H4 b! _
sets:
& Q7 R; T5 U% S/ Zdays/1 2 3 4 5 6 0/: required,start;
% _& Y' m  l5 s( H5 ]6 p# P" m8 dendsets

  o1 K  p0 u% W  C

刘振

这个我也不懂，那位仁兄出来具体介绍一下

成城

我就是再问啊

cmd2.com电影

挺好的，顶顶,新手还没有分呢,多回个贴

ehi28

嗯,不错,支持一下.
4 T: v5 R- V0 N3 G0 G

无聊2012

刘振 发表于 2011-8-12 20:01
' y8 ]6 p! o% o* b5 Amodel:
8 g- [( _* H5 w- j6 G" {sets:
days/mon..sun/: required,start;

对一下做下调整，便于理解

% }1 ~. v" P3 n8 \/ Lmodel:
sets: : q  L. A1 w6 `6 d! Z
days/mon..sun/: required,start;
endsets - h  W) ]$ D9 O5 I2 ~) H  K
data:
2 y" |( ^+ w& c: ]- ^2 {; T& o* D!每天所需的最少职员数;
required = 20 16 13 16 19 14 12; ; }: G' I5 C3 z! F( \' p" b
7 X& |9 R2 H  H; C enddata   ]- t4 R' b. j  e9 q% Z
  N/ Z" C2 f1 J' T! ]4 ~ !最小化每周所需职员数; . z4 K' V6 u5 \9 I. X% C0 \& H
min=@sum(days: start);
) c, e' {; }- e+ s0 b# F* [@for(days(J):
    @sum(
8 d% I/ {3 U( \& c             days(I) | I #le# 5:
: D$ Y& J! L$ P4 d             start(@wrap(J+I+2,7))
             ) >= required(J));
end

/ g  A6 @& _; |

ganquanlife

追梦者 发表于 2009-8-13 10:27
) K' {/ u* ~5 b* [5 J) r2 p1 N% k% E小弟与上面这位仁兄的理解稍有不同，英美中星期表示与我们不同，我们将星期一看成第一天，而他们则是将星 ...

我也觉得不用+1啊，

dirk190

追梦者 发表于 2009-8-13 10:27
小弟与上面这位仁兄的理解稍有不同，英美中星期表示与我们不同，我们将星期一看成第一天，而他们则是将星 ...

, F: p3 S. y5 {8 e1 s换成1到7 结果相同的