projectline3d.asv

能够实现Fisher线性判别

function p = projectline3d(point,w,cl);

x1=point(1);
y1=point(2);
z1=point(3);
p=w(1)*x1+w(2)*y1+w(3)*z1;
Aw=sqrt(w(1)^2+w(2)^2+w(3)^2);
pAw=p/(Aw^2);
(pAw*w
pjline=line([x1,x],[y1,y],[z1,z],'color',cl);
hold on;

% p=sqrt(x^2+y^2+z^2);
% if w(1)<0
%     if x>0
%         p=-p;
%     end
% else
%     if x<0
%         p=-p;
%     end
% end