Изменение чисел в строке

Question

У меня огромный фрейм данных. Тем не менее, у меня есть похожие идентификаторы, и это были разные наблюдения. То, что я пытаюсь сделать, это изменить последние / последние две цифры в столбце «ID». Итак, идентификатор alnfru_00001 в строке 5 должен быть alnfru_00006, а строка 34 должна быть carlin_00005 вместо carlin_00001 и так далее. Эта последовательность видна прямо во всем фрейме данных даже с другими идентификаторами. Кто-нибудь может оказать некоторую помощь?

Стоит ли сначала попытаться сгруппировать данные?

Примечание: я не хочу, чтобы конечный номер отслеживал номер строки

           ID          PFT        area
    1    alnfru_00001 alnfru Yukon_Delta
    2    alnfru_00002 alnfru Yukon_Delta
    3    alnfru_00003 alnfru Yukon_Delta
    4    alnfru_00004 alnfru Yukon_Delta
    5    alnfru_00001 alnfru Yukon_Delta
    6    alnfru_00002 alnfru Yukon_Delta
    7    alnfru_00003 alnfru Yukon_Delta
    8    alnfru_00004 alnfru Yukon_Delta
    9    alnfru_00005 alnfru Yukon_Delta
    26   calcan_00001 calcan Yukon_Delta
    27   calcan_00002 calcan Yukon_Delta
    28   calcan_00003 calcan Yukon_Delta
    29   calcan_00004 calcan Yukon_Delta
    30   carlin_00001 carlin Yukon_Delta
    31   carlin_00002 carlin Yukon_Delta
    32   carlin_00003 carlin Yukon_Delta
    33   carlin_00004 carlin Yukon_Delta
    34   carlin_00001 carlin Yukon_Delta
    18   alnfru_00001 alnfru Yukon_Delta
    19   alnfru_00002 alnfru Yukon_Delta
    20   alnfru_00003 alnfru Yukon_Delta
    21   alnfru_00004 alnfru Yukon_Delta
    22   alnfru_00001 alnfru Yukon_Delta
    23   alnfru_00002 alnfru Yukon_Delta
    24   alnfru_00003 alnfru Yukon_Delta
    25   alnfru_00004 alnfru Yukon_Delta

Фрейм данных должен выглядеть следующим образом

        ID          PFT        area
1    alnfru_00001 alnfru Yukon_Delta
2    alnfru_00002 alnfru Yukon_Delta
3    alnfru_00003 alnfru Yukon_Delta
4    alnfru_00004 alnfru Yukon_Delta
5    alnfru_00005 alnfru Yukon_Delta
6    alnfru_00006 alnfru Yukon_Delta
7    alnfru_00007 alnfru Yukon_Delta
8    alnfru_00008 alnfru Yukon_Delta
9    alnfru_00009 alnfru Yukon_Delta
26   calcan_00001 calcan Yukon_Delta
27   calcan_00002 calcan Yukon_Delta
28   calcan_00003 calcan Yukon_Delta
29   calcan_00004 calcan Yukon_Delta
30   carlin_00001 carlin Yukon_Delta
31   carlin_00002 carlin Yukon_Delta
32   carlin_00003 carlin Yukon_Delta
33   carlin_00004 carlin Yukon_Delta
34   carlin_00005 carlin Yukon_Delta
18   alnfru_00010 alnfru Yukon_Delta
19   alnfru_00011 alnfru Yukon_Delta
20   alnfru_00012 alnfru Yukon_Delta
21   alnfru_00013 alnfru Yukon_Delta
22   alnfru_00014 alnfru Yukon_Delta
23   alnfru_00015 alnfru Yukon_Delta
24   alnfru_00016 alnfru Yukon_Delta
25   alnfru_00017 alnfru Yukon_Delta

Answer 1

Может сделать:

library(dplyr)

df %>%
  group_by(PFT, area) %>%
  mutate(
    ID = as.character(ID),
    ID = paste0(substr(ID, 1, nchar(ID) - nchar(row_number())), row_number()))

Выход:

             ID    PFT        area
1  alnfru_00001 alnfru Yukon_Delta
2  alnfru_00002 alnfru Yukon_Delta
3  alnfru_00003 alnfru Yukon_Delta
4  alnfru_00004 alnfru Yukon_Delta
5  alnfru_00005 alnfru Yukon_Delta
6  alnfru_00006 alnfru Yukon_Delta
7  alnfru_00007 alnfru Yukon_Delta
8  alnfru_00008 alnfru Yukon_Delta
9  alnfru_00009 alnfru Yukon_Delta
10 calcan_00001 calcan Yukon_Delta
11 calcan_00002 calcan Yukon_Delta
12 calcan_00003 calcan Yukon_Delta
13 calcan_00004 calcan Yukon_Delta
14 carlin_00001 carlin Yukon_Delta
15 carlin_00002 carlin Yukon_Delta
16 carlin_00003 carlin Yukon_Delta
17 carlin_00004 carlin Yukon_Delta
18 carlin_00005 carlin Yukon_Delta
19 alnfru_00010 alnfru Yukon_Delta
20 alnfru_00011 alnfru Yukon_Delta
21 alnfru_00012 alnfru Yukon_Delta
22 alnfru_00013 alnfru Yukon_Delta
23 alnfru_00014 alnfru Yukon_Delta
24 alnfru_00015 alnfru Yukon_Delta
25 alnfru_00016 alnfru Yukon_Delta
26 alnfru_00017 alnfru Yukon_Delta