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

Super_xu

不错，不错。。。

吴楚

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

% H/ u2 W) ~: B( w1 U通俗的解释是：用来转换集合两端的索引，在集合的另一端继续索引。也就是说，在集合循环函数中，当达到集合的最后（或第一个）成员后，可以用@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.

7 h. \2 s# l' O& z9 E@for(days(J):
    @sum(days(I) | I #le# 5:
- k4 }+ _' ?& G$ Q5 S      start(@wrap(J+I+2,7))) >= required(J));
day(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:
sets:
! e' ~( L1 V: P/ e' Ndays/mon..sun/: required,start;
. ?) V" U6 R) ^$ h7 F* kendsets
, K& B6 i- }  o: i! f5 T) z& l3 Bdata:
' R3 X+ U" I! F' n$ e9 O4 W!每天所需的最少职员数;
! h. }4 V, \8 ?2 xrequired = 20 16 13 16 19 14 12;
enddata
!最小化每周所需职员数;
# r' l* ?* `% X% H- `1 Cmin=@sum(days: start);
@for(days(J):
8 g+ U) a% B9 k  T& E: x    @sum(days(I) | I #le# 5:
      start(@wrap(J+I+2,7))) >= required(J));
end
- a: J2 m$ @) b. J
$ z- C+ q2 v; V8 ^2 y% u, |. t- |解释下：
@for(days(J):
    @sum(days(I) | I #le# 5:
      start(@wrap(J+I+2,7))) >= required(J));

6 X) e& U7 e7 |$ J当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的职员和，以此类推。

( A0 Z8 L! m; U6 F3 o网上有一种说法是，英美中星期表示的不同，中国将星期一看成第一天，而国外则是将星期日看成第一天。在lingo中sun就表示第一天，用数字0标识。因此@wrap（index,limit）的用法就是index模limit再加1。将上面的程序中的集修改为
0 ?: \0 r6 u( R4 J

, K! {% ?! E9 E+ Ssets:
days/1 2 3 4 5 6 0/: required,start;
  e/ C- }$ ]# Y% v( ]endsets

刘振

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

成城

我就是再问啊

cmd2.com电影

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

ehi28

嗯,不错,支持一下.

无聊2012

刘振 发表于 2011-8-12 20:01
# e9 m6 p2 ^+ J/ Q, h- [* u# Q+ Vmodel:
sets:
4 V. j+ w* M  w$ Odays/mon..sun/: required,start;

* t' K5 o: \0 i1 D/ b- B' ^+ k# _6 B对一下做下调整，便于理解

model:
sets: : q  L. A1 w6 `6 d! Z
- X3 O; b2 M: F& J5 s: F: D days/mon..sun/: required,start;
endsets - h  W) ]$ D9 O5 I2 ~) H  K
7 O, b3 B5 e4 d3 d+ k/ y5 s data:
!每天所需的最少职员数;
0 }9 }( ^5 V# P9 K) v' U$ prequired = 20 16 13 16 19 14 12; ; }: G' I5 C3 z! F( \' p" b
$ ~0 W: \% n# h* F9 _4 w) ~6 `' { enddata   ]- t4 R' b. j  e9 q% Z
!最小化每周所需职员数; . z4 K' V6 u5 \9 I. X% C0 \& H
min=@sum(days: start);
; W6 Z- S; t8 ~5 d! Y@for(days(J):
7 y% ^) N0 i# L, R( Q& I' D    @sum(
             days(I) | I #le# 5:
! r( l1 h& b4 e, j9 @! o             start(@wrap(J+I+2,7))
+ f5 Q' c1 `5 O- P" ]             ) >= required(J));
8 b2 K9 E# l# ?" u( G, H5 Hend

ganquanlife

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

- \& ~  n2 k/ y' H* H4 p2 S) N我也觉得不用+1啊，

dirk190

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

换成1到7 结果相同的