删除向量中的重复项到下一个值

Question

我有一个由整数组成的向量，它可以取有限数量的值。考虑值为0,1,2的情况。

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

我想删除值的重复，直到下一个不同的值。完成此操作后，结果显示为

0 1 0 2

因此我想做一些像unique这样的东西（会给出0,1,2），但我想考虑订购。

由于

Answer 1

尝试（假设没有NA s）：

a[c(1, diff(a)) != 0]

Answer 2

使用我最喜欢的工具：

Rgames> rle(a<-c(0,0,0,1,1,0,0,2,2,2))
Run Length Encoding
  lengths: int [1:4] 3 2 2 3
  values : num [1:4] 0 1 0 2