vpdistance2.m

来自「使用支持向量机（svm）方法进行图像的单视度量(single view metr」· M 代码 · 共 9 行

function [d,alpha]=vpdistance2(VanLine,Lines)

        a1=atan2(Lines(:,2),Lines(:,1));
        a2=atan2(VanLine(2),VanLine(1));
        alpha=abs(a1-repmat(a2,size(a1,1),1));
        alpha=abs((alpha<pi/2).*alpha+(alpha>=pi/2).*(pi-alpha));
        alpha=abs((alpha<pi/2).*alpha+(alpha>=pi/2).*(pi-alpha));
        d=0;
end