📄 mdist.m
字号:
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%function [dist] = mdist (x,mu,C)%% [dist] = mdist(x,mu,C)%% computes from x values given mean mu and precision C% the distance, actually the quantity% % -0.5 (x-mu)' C (x-mu) d=size(C,1);if (size(x,1)~=d) x=x'; end;if (size(mu,1)~=d) mu=mu'; end;[ndim,N]=size(x);d=x-mu*ones(1,N);% too slow% dist=zeros(N,1);% for l=1:N,% dist(l)=-0.5*d(:,l)'*C*d(:,l);% end;d=x-mu*ones(1,N);Cd=C*d;% costs memory% dist=-0.5*diag(d'*C*d);% less expensive dist=zeros(1,N);for l=1:ndim, dist=dist+d(l,:).*Cd(l,:);enddist=-0.5*dist';return;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -