I have a dataframe:
y <- c(3, 3, 3, 2, 2, 2, 2, 1, 1, 2)
z <- c(1, 1, 1, 2, 2, 3, 3, 3, 4, 4)
df <- data.frame(y, z)
> df
y z
1 3 1
2 3 1
3 3 1
4 2 2
5 2 2
6 2 3
7 2 3
8 1 3
9 1 4
10 2 4
Now i want to create a group-id. The groups are based on y and should be numbered from 1 to n. Repetitive numbers for y refer to one group. In addition, the groups are nested in other groups based on z, so equal numbers for y represent different groups if they are in different groups at z. That means: for y there are 6 groups, for z 4 groups. Result should be:
> df
y z group_id
1 3 1 1
2 3 1 1
3 3 1 1
4 2 2 2
5 2 2 2
6 2 3 3
7 2 3 3
8 1 3 4
9 1 4 5
10 2 4 6
I am happy about any help.
You can use rleid from data.table package -
df$group_id <- data.table::rleid(paste(df$y, df$z))
df
y z group_id
1 3 1 1
2 3 1 1
3 3 1 1
4 2 2 2
5 2 2 2
6 2 3 3
7 2 3 3
8 1 3 4
9 1 4 5
10 2 4 6
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加