r - グループ R に基づく番号付け ID

Question

私はdataframe以下と呼ばれていますdf1。「Apple」に近づき次第、ID番号を次の序数に変更します。「Apple」が割り当てられたら、その後のすべての対応するラベルを「Apple」に割り当てられたものにしたい。しかし、「Apple」が登場するとすぐに、次のラベルのように数値が上がります。

ありがとうございました！

df1 <- data.frame (fruit_name  = c("Apple", "Banana", "Cherry",
                           "Orange", "Blueberry", "Peach",
                           "Apple", "Banana", "Cherry",
                           "Orange", "Blueberry", "Peach",
                           "Apple", "Banana", "Cherry",
                           "Orange", "Blueberry",
                           "Apple", "Cherry"))

以下に

df2 <- data.frame (ID  = c("1", "1", "1", "1", "1", "1", "2", "2",
                           "2", "2", "2", "2", "3", "3", "3", "3", "3",
                           "4", "4"),
                   fruit_name = c("Apple", "Banana", "Cherry",
                                  "Orange", "Blueberry", "Peach",
                                  "Apple", "Banana", "Cherry",
                                  "Orange", "Blueberry", "Peach",
                                  "Apple", "Banana", "Cherry",
                                  "Orange", "Blueberry",
                                  "Apple", "Cherry"))

Answer 1

使用できますrowid

library(data.table)
df1$ID <- rowid(df1$fruit_name)