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

Super_xu

不错，不错。。。

吴楚

该函数返回j=index-k*limit，其中k 是一个整数，取适当值保证j 落在区间[1，limit]内。该函数相当于index 模limit 再加1。该函数在循环、多阶段计划编制中特别有用。
) @) y4 W* N+ ?$ `
( ~! v  U. E4 g2 [6 Q( Y通俗的解释是：用来转换集合两端的索引，在集合的另一端继续索引。也就是说，在集合循环函数中，当达到集合的最后（或第一个）成员后，可以用@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.

" P+ M1 U* d6 ?+ x3 b( e; ^1 R5 M@for(days(J):
    @sum(days(I) | I #le# 5:
3 A6 ]! ?9 g7 A      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:
. }8 U& F- h" d1 Tdays/mon..sun/: required,start;
( ?* R: X# u, s/ B& ~  zendsets
( D3 [8 i! w" h, z* N, i6 f" Ldata:
& t4 E" `. d' ?$ D4 u# b/ h- A& T!每天所需的最少职员数;
- E) ?. i, Q0 grequired = 20 16 13 16 19 14 12;
enddata
% ?, @3 ^% x  G( B9 I' U6 f!最小化每周所需职员数;
* `* @5 E3 k2 V3 I0 umin=@sum(days: start);
: [9 _) y. n; |2 {8 z@for(days(J):
    @sum(days(I) | I #le# 5:
: r/ N5 K8 B4 Q& o8 a* r8 P2 M0 a6 h      start(@wrap(J+I+2,7))) >= required(J));
end
3 n) v- |5 a! D$ |7 w  K# n
6 \; x' |' C5 d6 V" S6 T! q解释下：
@for(days(J):
* i$ t1 `! l& i0 K0 m6 R) Q# @4 d    @sum(days(I) | I #le# 5:
9 O' o0 |2 N- w. L% o4 T      start(@wrap(J+I+2,7))) >= required(J));
/ J: B9 T) `# `6 {2 t6 }& _
当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的职员和，以此类推。
' S2 ]% U$ [) f; q
4 V& F+ @1 u! e5 y( |网上有一种说法是，英美中星期表示的不同，中国将星期一看成第一天，而国外则是将星期日看成第一天。在lingo中sun就表示第一天，用数字0标识。因此@wrap（index,limit）的用法就是index模limit再加1。将上面的程序中的集修改为
) @8 y' g  K$ ?0 \
. m8 K9 n- I7 d* e6 ]
: d- Q# L% h& |, Zsets:
7 E+ ~5 R$ [! y  E; {days/1 2 3 4 5 6 0/: required,start;
$ t2 s' n( {, C8 Oendsets

刘振

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

成城

我就是再问啊

cmd2.com电影

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

ehi28

嗯,不错,支持一下.

无聊2012

刘振 发表于 2011-8-12 20:01
model:
sets:
days/mon..sun/: required,start;

8 A# E+ }, I- W1 D" r8 J  c对一下做下调整，便于理解
! U' Y( n$ `, a' m( y
model:
sets: : q  L. A1 w6 `6 d! Z
days/mon..sun/: required,start;
- c; I: X- l: w6 i5 Yendsets - h  W) ]$ D9 O5 I2 ~) H  K
data:
!每天所需的最少职员数;
8 a/ `- i6 k- j5 H1 S5 {5 S4 Crequired = 20 16 13 16 19 14 12; ; }: G' I5 C3 z! F( \' p" b
enddata   ]- t4 R' b. j  e9 q% Z
!最小化每周所需职员数; . z4 K' V6 u5 \9 I. X% C0 \& H
0 s9 i- e% {) `& Y min=@sum(days: start);
$ y( G  ^. w  ?- f1 T: j1 F@for(days(J):
    @sum(
( F8 L' J, i2 |7 {             days(I) | I #le# 5:
             start(@wrap(J+I+2,7))
1 D$ k2 m: x$ m+ q" q2 n             ) >= required(J));
$ I$ D$ Z7 v% q/ v/ {end
) {- p/ R) p. s  }8 F

ganquanlife

追梦者 发表于 2009-8-13 10:27
1 {- ]7 \& |. N6 _) ^+ G& T3 Z  u小弟与上面这位仁兄的理解稍有不同，英美中星期表示与我们不同，我们将星期一看成第一天，而他们则是将星 ...

我也觉得不用+1啊，

dirk190

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

( j" |# a& V* Q换成1到7 结果相同的