当序列值缺失时，将向量排序为重复序列 R

Question

我想取一个像这样的向量，然后把这个向量排列成一个重复的序列，在没有值的时候，保持1，2，3的等级顺序。

x <- c(1,1,1,2,2,2,2,3,3)

然后把这个向量排序成一个重复的序列 当没有值的时候保持1, 2, 3的等级顺序.

返回。c(1,2,3,1,2,3,1,2,2)

Answer 1

我们可以创建 order 基于'x'的顺序

x[order(ave(x, x, FUN = seq_along))]
#[1] 1 2 3 1 2 3 1 2 2

---

或与 rowid 从data.table

library(data.table)
x[order(rowid(x))]
#[1] 1 2 3 1 2 3 1 2 2