How to return the sequential number of nonzero and zero elements in a list?

Given list A = [1, 2, 3, 4, 5, 0, 0, 3, 4, 5, 0, 0, 0, 0], how can I return a matrix of the sequential number of non-zero and zero elements in the list? In the above example, the output should be B = [5, 2; 3, 4].

[Image Analyst]

And what would you want for this:

A = [0, 0, 1, 2, 3, 0, 0, 3, 4, 5, 0, 0, 0]

or would you never have a different number of zero and non-zero stretches?

Answer 1

[Andrei Bobrov]

B = reshape(diff([find([1;diff(A(:)>0)~=0]);numel(A)+1]),2,[])';

Answer 2

[Image Analyst]

Sounds a lot like homework. Here's a hint:

A = [1, 2, 3, 4, 5, 0, 0, 3, 4, 5, 0, 0, 0, 0]
% Find lengths of non-zero stretches of data.
labeled = bwlabel(A ~= 0)
measurements = regionprops(labeled, 'Area', 'PixelList');
allAreas1 = [measurements.Area] % Produces 5 3

% Find lengths of zero stretches of data.
labeled = bwlabel(A == 0)
measurements = regionprops(labeled, 'Area', 'PixelList');
allAreas0 = [measurements.Area] % Produces 2 4

% Interleave allAreas1 and allAreas0 to form "B"
% See if you can do this part yourself.