求教一下这个lingo程序有什么问题model:sets:capital/0..15/:r,p,q,x;endsetsdata:r=0.05 9.6 18.5 49.4 23.9 8.1 14 40.7 31.2 33.6 36.8 11.8 9 35 9.4 15;q=0 42 54 60 42 1.2 39 68 33.4 53.3 40 31 5.5 46 5.3 23;p=0 2.1 3.2 6.0 1.5 7.6 3.4 5.6 3.

Question

求教一下这个lingo程序有什么问题
model:
sets:
capital/0..15/:r,p,q,x;
endsets
data:
r=0.05 9.6 18.5 49.4 23.9 8.1 14 40.7 31.2 33.6 36.8 11.8 9 35 9.4 15;
q=0 42 54 60 42 1.2 39 68 33.4 53.3 40 31 5.5 46 5.3 23;
p=0 2.1 3.2 6.0 1.5 7.6 3.4 5.6 3.1 2.7 2.9 5.1 5.7 2.7 4.5 7.6;
lmda=0.7;W=1;
enddata
min=@sum(capital(i):(1-lmda)*x(i)*(r(i)-p(i))+lmda*W;
@for(capital(i):x(i)*q(i)

Answer 1

model:
sets:
capital/1..16/:r,p,q,x;
endsets
data:
r=0.05 9.6 18.5 49.4 23.9 8.1 14 40.7 31.2 33.6 36.8 11.8 9 35 9.4 15;
q=0 42 54 60 42 1.2 39 68 33.4 53.3 40 31 5.5 46 5.3 23;
p=0 2.1 3.2 6.0 1.5 7.6 3.4 5.6 3.1 2.7 2.9 5.1 5.7 2.7 4.5 7.6;
lmda=0.7;W=1;
enddata
min=@sum(capital(i):(1-lmda)*x(i)*(r(i)-p(i)))+lmda*W;
@for(capital(i):x(i)*q(i)