0001 function Kout = concatkernel(K,d) 0002 0003 Kout = zeros(size(K,1),size(K,2)); 0004 for i=1:size(K,3) 0005 Kout = Kout + d(i)*K(:,:,i); 0006 end; 0007