5

カテゴリ内のシーケンスを取得しようとしています。

私のデータは次のとおりです。

A B 
1 1 
1 2
1 2
1 3
1 3
1 3
1 4
1 4

そして、データが次のように見えるような変数「c」を取得したい:

A B C
1 1 1
1 2 1
1 2 2
1 3 1
1 3 2
1 3 3
1 4 1
1 4 2
4

1 に答える 1

13

aveで使用seq_along:

> mydf$C <- with(mydf, ave(A, A, B, FUN = seq_along))
> mydf
  A B C
1 1 1 1
2 1 2 1
3 1 2 2
4 1 3 1
5 1 3 2
6 1 3 3
7 1 4 1
8 1 4 2

データが既に順序付けされている場合 (この場合のように)、( ) を使用sequenceすることもできますが、 ではその制限はありません。rlemydf$C <- sequence(rle(do.call(paste, mydf))$lengths)ave

あなたがdata.tableファンなら.N、次のように利用できます。

library(data.table)
DT <- data.table(mydf)
DT[, C := sequence(.N), by = c("A", "B")]
DT
#    A B C
# 1: 1 1 1
# 2: 1 2 1
# 3: 1 2 2
# 4: 1 3 1
# 5: 1 3 2
# 6: 1 3 3
# 7: 1 4 1
# 8: 1 4 2
于 2013-09-15T17:09:35.000 に答える