power3.m

来自「市场最优配置」· M 代码 · 共 12 行

a=[0.786 0.792 0.764 0.270 0.424 1.02 0.578 0.296 0.254 0.522];
b=[270 300 280 265.7 308 280 252.9 242.7 279.1 270];
min=[30 20 25 50 50 15 120 75 250 75];
max=[100 80 120 150 150 60 320 200 520 280];
p=[1022 963 978 993 1037 1066 1095 1124 1138 1154 1182 1197 1242 1271 1314 1372 1314 1271 1285 1290 1372 1459 1459 1081];
for i=1:length(p);
    DLMWRITE('PowerMarket.doc',i,'-append',  'newline', 'pc');
    DLMWRITE('PowerMarket.doc','A','-append',  'newline', 'pc');
    DLMWRITE('PowerMarket.doc','p','-append',  'newline', 'pc');
    power2(a,b,min,max,p(i));  
    DLMWRITE('PowerMarket.doc',' ','-append',  'newline', 'pc' );
end;