view general/numerical/array/prod1.m @ 54:9bcf5e133bf0

Added from old stats library.
author samer
date Mon, 23 Feb 2015 16:08:09 +0000
parents db7f4afd27c5
children
line wrap: on
line source
function Y=prod1(X)
% prod1 - prod over dimension 1 and shiftdim 1
%
% prod1 :: [[N M]] -> [[M]].

	Z=prod(X,1);
	S=size(Z);
	Y=reshape(Z,[S(2:end) 1]);