обнаружение последовательных повторений в R

Question

в R, я хотел бы узнать, есть ли последовательные повторения в моих данных.

A <- c(1,2,3,3,4) 

B <- c(1,2,3,4,3) 

Для A, я хочу получить ИСТИННУЮ, так как есть два 3s непосредственно друг за другом.

Для B, я хочу, чтобы получить значение FALSE, так как 3s отделены друг от друга 4.

Спасибо сообществу! pointingeye

Answer 1

Вы можете использовать rle для этого:

> rle(A) 
Run Length Encoding 
    lengths: int [1:4] 1 1 2 1 
    values : num [1:4] 1 2 3 4 
> any(rle(A)$lengths > 1) 
[1] TRUE 
> any(rle(B)$lengths > 1) 
[1] FALSE 

Answer 2

Попробуйте rle:

any(rle(A)$lengths > 1) 
#[1] TRUE 
any(rle(B)$lengths > 1) 
#[1] FALSE 

Альтернативное решение (diff):

any(diff(A)==0) 
#[1] TRUE 
any(diff(B)==0) 
#[1] FALSE 

Answer 3

0 %in% diff(A) - TRUE 
0 %in% diff(B) - FALSE 

Только в случае (по крайней мере) две последовательные идентичные разности чисел могут быть равны 0.