samer@23: function o=mean(A,DIM), 
samer@23: 	if nargin<2, o=map(@mean,A);
samer@23: 	else o=map(@(x)mean(x,DIM),A);
samer@23: 	end
samer@23: end
samer@3: