Mercurial > hg > ishara
diff general/arrutils/pad.m @ 4:e44f49929e56
Adding reorganised general toolbox, now in several subdirectories.
author | samer |
---|---|
date | Sat, 12 Jan 2013 19:21:22 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/general/arrutils/pad.m Sat Jan 12 19:21:22 2013 +0000 @@ -0,0 +1,8 @@ +function b=pad(x,sz,a), +% pad - pad out an array to given size with given elements +% +% pad :: A, D:[[2]], [[S]->A] -> [D->A]. + +[N,M]=size(a); +b=repmat_to(x,max(sz,[N,M])); +b(1:N,1:M)=a;