checktw.m

结合于遗传算法的偏最小二乘 光谱数据与非光谱数据均可使用

% function checktw checks twins in the library of the already tested chrom.
function den=checktw(cc,lib,a)
	den=0;
	n=0;
	while den==0 & n<size(lib,1)
  n=n+1;
  if a==lib(n,:)
    den=1;
  end
end