Mercurial > repos > public > sbplib

comparison +blockmatrix/toMatrix.m @ 704:111fcbcff2e9 feature/optim

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merg with featuew grids
author Ylva Rydin <ylva.rydin@telia.com>
date Fri, 03 Nov 2017 10:53:15 +0100
parents 2501067f2fc7
children
comparison
equal deleted inserted replaced
703:027f606fa691 704:111fcbcff2e9
10 N = sum(n); 10 N = sum(n);
11 M = sum(m); 11 M = sum(m);
12 12
13 A = sparse(N,M); 13 A = sparse(N,M);
14 14
15 n_ind = [0 cumsum(n)];
16 m_ind = [0 cumsum(m)];
17
18 for i = 1:size(bm,1) 15 for i = 1:size(bm,1)
19 for j = 1:size(bm,2) 16 for j = 1:size(bm,2)
20 if isempty(bm{i,j}) 17 if isempty(bm{i,j})
21 continue 18 bm{i,j} = sparse(n(i),m(j));
22 end 19 end
23 % TODO: If this ever fails for large matrices. Try cell2mat instead.
24 A(n_ind(i)+1:n_ind(i+1),m_ind(j)+1:m_ind(j+1)) = bm{i,j};
25 end 20 end
26 end 21 end
22 A = cell2mat(bm);
27 end 23 end