遗传算法-偏最小二乘回归

数据集必须是o，x + 1矩阵，其中每一行是一个对象，列1：x是X变量，最后一列是Y变量。 默认值为： 种群大小：30条染色体； 平均每个原始染色体的5个变量； 5个缺失组； 在同一染色体中选择的最大变量数：30； 变异概率：1%； 交叉概率：50%； 自标定； 组件的最大数量：15； 运行次数：100； 100次评估后的反向消除 结束（如果评估的数目不是 100的倍数；

% function backw performs backward selection
function [ncrispmaxcompmaxccmaxrisplibb]=backw（rcrcromrespnumvarccdatasetyautngmaxcompmaxrisplibbmxisximyisyiel）;
% verifying the list of the already “backwarded“ chromosomes
test1=1;
crb=0;ncp=[];rispmax=[];compmax=[];
if isempty（libb）==0
  while test1==1 & crb    crb=crb+1;
    j=0;
    test2=1;
    while test2==1 & j      j=j+1;
      if crom（crb:）==libb（j:）
        test2=0;
      end
    end
    if test2==1
      test1=0;	
    end
  end
else
  crb=1;
end

impr=1;
nc=crom（crb:）;
startresp=resp（crb:）;
while impr==1
  impr=0;
  libb=[libb;nc];
  start=find（nc）;
  startvar=size（start2）;
  if startvar>1
    for i=1:startvar
      varr=start;
      varr（i）=[];
      cc=cc+1;
      if el==3;
      	[facrisp]=plsgacv（dataset（:varr）yautngmaxcompmxi（:varr）sxi（:varr）myisyi）;
      else
      	[facrisp]=plsgacv（dataset（:varr）yautngmaxcompmxi（:varr）sxi（:varr））;
      end
      if risp>=startresp
        impr=1;
        ncp=nc;
        ncp（:start（i））=0;
        rispmax=risp;
        compmax=fac;
        startresp=risp;
        if risp>maxrisp
          disp（[‘ev. ‘ int2str（cc） ‘ - ‘ num2str（risp）]）
          maxrisp=risp;
        end
      end
    end
    nc=ncp;
  end
end

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

     文件       1363  2016-06-13 11:10  genpls\backw.m

     文件       1266  2016-06-13 11:10  genpls\betacdf.m

     文件       2764  2016-06-13 11:10  genpls\betainv.m

     文件       1211  2016-06-13 11:10  genpls\betapdf.m

     文件        208  2016-06-13 11:10  genpls\checktw.m

     文件        342  2016-06-13 11:10  genpls\chksubs.m

     文件       3531  2016-06-13 11:10  genpls\distchck.m

     文件        824  2016-06-13 11:10  genpls\err_ga.m

     文件       1331  2016-06-13 11:10  genpls\finv.m

     文件       6984  2018-08-09 19:51  genpls\gapls.m

     文件       5976  2016-06-13 11:10  genpls\gaplsopt.m

     文件       6754  2016-06-13 11:10  genpls\gaplsout.m

     文件       7429  2016-06-13 11:10  genpls\gaplssp.m

     文件      19255  2016-06-13 11:10  genpls\mangapls.pdf

     文件        726  2016-06-13 11:10  genpls\plotmore.m

     文件       3645  2016-06-13 11:10  genpls\plotone.m

     文件       1784  2016-06-13 11:10  genpls\plsgacv.m

     文件       3479  2016-06-13 11:10  genpls\predpls.m

     文件        429  2016-06-13 11:10  genpls\pr_ga.m

     文件         48  2016-06-13 11:10  genpls\randomiz.m

     文件       1365  2016-06-13 11:10  genpls\reg_ga.m

     文件        371  2016-06-13 11:10  genpls\sc_ga.m

     文件       2646  2016-06-13 11:10  genpls\tilefigs.m

     文件        967  2016-06-13 15:01  genpls\updateGapls.m

     文件       5012  2016-06-13 11:10  genpls\zoomrb.m

     目录          0  2016-06-13 15:23  genpls

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

                79710                    26