tanimotodistance.m

来自「有监督自组织映射-偏最小二乘算法(A supervised self-organ」· M 代码 · 共 9 行

function [Distance] = TanimotoDistance(X,Map,MLKP);

[Dummy,Nvar] = size(X);
BinX=(X>0)';
BinMap=(Map>0);
for iunit=1:MLKP.Nunits
    Distance(iunit)=sum(abs(BinX-BinMap(:,iunit)))/Nvar;
end