一个关于DEA交叉评价的程序
>>clear
X=[0.9531.3330.9721.1510.6830.634
1.4551.1451.2781.0231.11.228
1782.21621.31719.11366.21652.71616.5
11.84213.636101517.14310
6.513133.256.54.333];%用户键入输入矩阵X
Y=[321815364240
10.17.529.259.437.9510.05];%用户键入输出矩阵Y
n=size(X,1);m=size(X,1);s=size(Y,1);%以下是第一轮线性规划,进行自我评价
A=[-X'Y];b=zeros(n,1);
LB=zeros(m+s,1);UB=[];
fori=1:n;
Aeq=[X(:,i)’zeros(1,s)];beq=l;
f=[zeros(1,m)-Y(:,1)'];
w(:,i)=LINPROG(f,A,b,Aeq,beq,LB,UB);%解线性规划,得DMUi的最佳权重向量wi*
Eii=Y(:,i)'*w(m+1:m+s,i);%得到DMU,的自我评价值Eii
fork=1:n,%以下是第二轮线性规划,进行交叉评价
f=[zeros(1,m)Y(:,k)'];
Aeq=[X(:,k)'zeros(1,s)
Eii*X(:,i)'-Y(:,i)'];
beq=[1
0];
v=LINPROG(f,A,b,Aeq,beq,LB,UB);%解线性规划
E(i,k)=(Y(:,k)'*v(m+1:m+s))/(X(:,k)’*v(1:m)),%得到交叉评价值Em
end
end
E
???6.513133.256.54.333];%用户键入输入矩阵X
|
Error:Missingvariableorfunction.
请高手帮忙啊!
分 -->
|