Mercurial > hg > ishara

view general/numerical/array/nary.m @ 17:cb249ba61e9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Moved from parent directory.
author samer
date Thu, 17 Jan 2013 13:21:46 +0000
parents db7f4afd27c5
children
line wrap: on
line source
% nary - return array contain nary sequece over N columns
%
% nary :: M:natural, N:natural -> [[M^N,N]->1..M].

function B=nary(M,N)

if (N==1), B=(1:M)';
else
	b=nary(M,N-1);
	m=size(b,1);
	B=[ kron((1:M)',ones(m,1)), repmat(b,M,1)];
end