mminus.m (247B)
1 function Z=chadminus(X,Y); 2 % The dot minus of Gauss -- matlab need exact dimensions. 3 % extends Z=X-Y 4 [n1 k1]=size(X); 5 [n2 k2]=size(Y); 6 7 if (n1==n2 & k1==k2); Z=X-Y; 8 elseif n1==n2; Z=X-kron(Y,ones(1,k1)); 9 else; Z=X-kron(Y,ones(n1,1)); 10 end;