Splitting a vector at sign change

K = [1 2 3 4 5 6 7 8 -1 -2 -3 -4 -5 -6 -7 -8 1 2 3 4 5 6 7 8] ; 
K = K' ; 
S = sign(K) ;
C = mat2cell(S, diff([0; find(diff(S)); size(S,1)]));
L = cellfun(@numel,C) ;
iwant = mat2cell(K,L) ; 
celldisp(iwant)

2 个评论
显示无隐藏无

Stephen23 2020-6-8

编辑：Stephen23 2020-6-8

在 MATLAB Online 中打开

A simpler and more efficient approach to get the run lengths:

>> L = diff(find([1,diff(sign(K)),1]))
L =
   8   8   8

Holmbrero 2020-6-9

Thanks for the input!

I have a follow up question.

I want the values from iwant as a txt. or equal with each cell as a column such that:

iwant(1) iwant(2) iwant(3)

1 -1 1

2 -2 2

3 -3 3

4 -4 4

5 -5 5

6 -6 6

7 -7 7

8 -8 8

And so on. Any suggestions?

Regards,

请先登录，再进行评论。

Answer 2

Holmbrero 2020-6-8

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/544388-splitting-a-vector-at-sign-change#answer_448058

Works great. Thank you very much!

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

请先登录，再进行评论。

Answer 3

Kevin Joshi 2020-6-8

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/544388-splitting-a-vector-at-sign-change#answer_448067

在 MATLAB Online 中打开

K = [1 2 3 ...
    -1 -2 -3 ...
    -1 -2 -3 -4 ...
    1 2 3 4 5 6 7 8];
%%
m = 1;
n = 1;
x = 1;
y = 1;
for i = 1:length(K)
    if K(i)<0
        s.(['n' num2str(m)])(n) = K(i);
        n = n + 1;
        if (i+1) < length(K) && K(i+1) > 0
            x = x + 1;
            y = 1;
        end        
    else
        s.(['p' num2str(x)])(y) = K(i);
        y = y + 1;
        if (i+1) < length(K) && K(i+1) < 0
            m = m + 1;
            n = 1;
        end
    end
end