web-dev-qa-db-ja.com

dplyr：group_byの行番号/行位置を生成します

データセットがあり、グループごとに行の位置を生成したい。例えば

library(data.table)

data<-data.table(Position=c(1,2,3,4,5,6,7,8,9,10),
Category=c("M","M","M","M","F","F","F","M","M","F"))

カテゴリーごとにグループ化し、グループごとの行位置である列を作成します。以下またはdata.tableのようなもの

dataByGroup %>% group_by(Category) %>% mutate(positionInCategory = 1:nrow(Category))

これを達成する方法を見つけることができませんか？

望ましい出力：

| Position|Category | positionInCategory|
|--------:|:--------|------------------:|
|        1|M        |                  1|
|        2|M        |                  2|
|        3|M        |                  3|
|        4|M        |                  4|
|        5|F        |                  1|
|        6|F        |                  2|
|        7|F        |                  3|
|        8|M        |                  5|
|        9|M        |                  6|
|       10|F        |                  4|
rdata.tabledplyr
15
iboboboru

以下を試してください：

library(data.table)
library(dplyr)

data<-data.table(Position=c(1,2,3,4,5,6,7,8,9,10),
                 Category=c("M","M","M","M","F","F","F","M","M","F"))

cleanData <- data %>%
  group_by(Category) %>%
  mutate(positionInCategory = 1:n())
22
user1357015

試してみる

data[, new := rowid(Category)]
# or, if you're using 1.9.6 or older
data[, new := 1:.N, by=Category]

    Position Category new
 1:        1        M   1
 2:        2        M   2
 3:        3        M   3
 4:        4        M   4
 5:        5        F   1
 6:        6        F   2
 7:        7        F   3
 8:        8        M   5
 9:        9        M   6
10:       10        F   4

rowidを使用するには、現在 パッケージの不安定版/開発版 が必要です。

6
Frank