小编use*_*942的帖子

假设我想在 R 的序列中找到最长长度的连续数字（不包括 0）。

示例：(0,2,3,0,5)在这种情况下，它应该返回2.

我想出的解决方案如下：

A1 <- c(1, 1, 0,1,1,1)  
length =NULL  
B<-rle(A1==0)  
C<-B$lengths  
D<-B$values  
for(i in 1:length(C)){  
if(D[i]==FALSE){length[i]=C[i]}
}

length <- length [!is.na(length )]  
max(length)  
[1] 3

如何在R中的向量中找到最长的非零数字序列？