showlj.m

钢管订购和运输的最优规划 程序使用说明： 两种方法进行 1

load w
[x,y]=Dwij(w);
[u,v,ww]=deallamda(y);
ShowD(ww);

Dealdata.m

function [ C ] = dealdata( D )
%compute the cost of the unit fee ,that the A will pay for the thing they
%get
%  Detailed explanation goes here
P=[160;155;155;160;155;150;160];
C=ones(7,15);
C(:,1)=D(:,1)+10.4;
C(:,2:15)=D;
C=C+P(:,ones(1,15));
[m,n]=size(C);
fid=fopen('d:\C2.doc','w+');
for i=1:m
for j=1:n
if (j~=n)
fprintf(fid,'%4.1f\t',C(i,j));
else
fprintf(fid,'%4.1f\n',C(i,j));
end
end
end
fclose(fid);