Mercurial > hg > smallbox
diff Problems/private/sampgrid.m @ 16:41a5a3c26961
(none)
author | idamnjanovic |
---|---|
date | Thu, 25 Mar 2010 14:05:46 +0000 |
parents | 207a6ae9a76f |
children |
line wrap: on
line diff
--- a/Problems/private/sampgrid.m Thu Mar 25 14:05:27 2010 +0000 +++ b/Problems/private/sampgrid.m Thu Mar 25 14:05:46 2010 +0000 @@ -26,6 +26,9 @@ p = ndims(x); +if (p==2 && any(size(x)==1) && length(blocksize)==1) + p = 1; +end if (numel(blocksize)==1) blocksize = ones(1,p)*blocksize; @@ -67,27 +70,3 @@ end end - -% -% p = ndims(x); -% -% n = zeros(1,p); -% for i = 1:p -% n(i) = length(varargin{i}); -% end -% -% nsamps = prod(n); -% -% % create y of the same class as x -% y = zeros(prod(blocksize),nsamps,class(x)); -% -% id = cell(p,1); -% for k = 1:nsamps -% [id{:}] = ind2sub(n,k); -% for j = 1:p -% id{j} = varargin{j}(id{j}) : varargin{j}(id{j})+blocksize(j)-1; -% end -% block = x(id{:}); -% y(:,k) = block(:); -% end -