DEA的Matlab程序272543

基于DEA算法的Matlab 程序，好用，可以运行

function[Efc] = DEACRSEI（XY）;

i=size（X1）; % check #Inputs
j=size（Y1）; % check #Outputs
k=size（X2）; % check #DMUs
if k ~= size（Y2）
    disp（‘Invalid number od DMU at Input Matrix‘）
end % end check matrix size

for o = 1:k % Check from DMU o=1 the last
 c=[-1 zeros（1k+i+j）];
 b=[zeros（1i） Y（:o）‘]‘;
 A=[X（:o） -X -eye（i） zeros（ij）; zeros（j1） Y zeros（ji） -eye（j）];
% runs PPL
 [zmax ibasic xbasic]=PPL（Abc）;
%
 sprintf（‘DMU %d CRS/E/I Efficiency is %d‘o-zmax）
 disp（‘non-zero variables: ‘）disp（ibasic）
 disp（‘Solving each Variable: ‘）disp（xbasic）
 Efc（o）=-zmax; % takes Ef DMU（o）
end % end loop DMUs

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        639  2003-11-16 13:05  DEA的Matlab程序\DEACRSEI.m

     文件        652  2003-11-16 13:08  DEA的Matlab程序\DEACRSEO.m

     文件        635  2003-11-16 13:40  DEA的Matlab程序\DEACRSMI.m

     文件        656  2003-11-16 13:12  DEA的Matlab程序\DEACRSMO.m

     文件       1995  2003-11-16 13:18  DEA的Matlab程序\DEASolver.m

     文件        697  2003-11-16 12:54  DEA的Matlab程序\DEAVRSEI.m

     文件        707  2003-11-16 12:56  DEA的Matlab程序\DEAVRSEO.m

     文件        675  2003-11-16 12:58  DEA的Matlab程序\DEAVRSMI.m

     文件        705  2003-11-16 13:02  DEA的Matlab程序\DEAVRSMO.m

     文件        464  2002-10-13 11:27  DEA的Matlab程序\Kaoru pg 12.mat

     文件        272  2003-11-16 13:41  DEA的Matlab程序\Kaoru pg 26.mat

     文件        280  2003-11-16 13:43  DEA的Matlab程序\Kaoru pg 28.mat

     文件       2475  2002-10-01 02:12  DEA的Matlab程序\Phasei.m

     文件       2076  2002-10-01 02:12  DEA的Matlab程序\Phaseii.m

     文件       2551  2002-10-01 02:12  DEA的Matlab程序\PPL.m

     目录          0  2011-03-30 16:33  DEA的Matlab程序

----------- ---------  ---------- -----  ----

                15479                    16