重命名重复的行名称并按名称在R中的位置进行索引_R

重命名重复的行名称并按名称在R中的位置进行索引

重命名重复的行名称并按名称在R中的位置进行索引,r,R,我有一个数据表，它有一个变量Top，我将Top变量视为我的行名称，因为您可以看到第一个表，行名称是重复的，所以我想根据引用的位置向行名称添加索引，如子索引 First table row Top points IS IS 3 HT HT S ON2 ON2 837 IS IS 19 NO NO 41 IS IS IC ON2 ON2 40 HT HT 1 ON2 ON2 BI Expected - If I want to s

我有一个数据表，它有一个变量Top，我将Top变量视为我的行名称，因为您可以看到第一个表，行名称是重复的，所以我想根据引用的位置向行名称添加索引，如子索引

First table
row Top points  
IS  IS  3   
HT  HT  S   
ON2 ON2 837 
IS  IS  19  
NO  NO  41  
IS  IS  IC  
ON2 ON2 40  
HT  HT  1   
ON2 ON2 BI  

Expected - If I want to see the row name ON2_1 it has appeared in three places and I have to index them based on the position they appeared. 

output
rowname occured Top  points
IS_1    1ST    TIME  IS 
HT_1    1ST    TIME  HT 
ON2_1   1ST    TIME  ON2
IS_2    2ND    TIME  IS 
NO_1    1ST    TIME  NO 
IS_3    3RD    TIME  IS 
ON2_2   2ND    TIME  ON2    
HT_2    2ND    TIME  HT 
ON2_3   3RD    TIME  ON2

我们可以用

library(dplyr)    
df1 %>%
     group_by(Top) %>% 
     mutate(rn = row_number()) %>%
     transmute(rowname = paste(row, rn , sep="_"), 
              occured = c("1ST", "2ND", "3RD")[rn], 
              points = row) %>% 
     ungroup %>%
     mutate(Top = "TIME")