如何在一行中查找具有重複值的向量？

Question

我有很多的載體，它看起來是這樣的：

a <- c(0,0,0,1,1) 
b <- c(1,0,0,0,1) 
c <- c(0,0,1,1,1) 

在所有這些載體都被連續重複三次的值。

我需要以某種方式識別這些重複。主要條件是一個接一個地重複的價值。

重複的（）將不會幫助，在基地至少。

此類載體的定義是必要的，以便然後將其刪除。

適合我工作的載體。

d <- c(1,0,1,0,0) 

不正確的載體。

e <- c(1,1,1,0,0) 

Answer 1

你可能想看看rle從基礎包或data.table的rleid功能。

rle(c(0,0,0,1,1)) 
Run Length Encoding 
lengths: int [1:2] 3 2 
values : num [1:2] 0 1 

library(data.table) 
rleid(c(0,0,0,1,1)) 
[1] 1 1 1 2 2 

兩者都會查看相同編號的運行。 rle函數返回一個長度和值的列表，並且rleid函數每次系列中的數字更改時都會返回向上計數。