gdist.m

来自「这里面有很多有用的东东」· M 代码 · 共 13 行

function d = gdist(X,Y,A)
%GDIST	
%The distance between points X and Y in Rn. 
%Rn has inner product defined by a symmetric matrix A.
%Calling format: gdist(X,Y,A)

%Copyright Gareth Williams, Stetson University 
[e-mail], http://www.stetson.edu/~gwilliam
%Accompanies "Linear Algebra with Applications" by Gareth Williams

Z=X-Y;
d=sqrt(abs((Z*A*Z')));