R dplyr获取排序的行号

library(dplyr)

# 创建一个示例数据框
df <- data.frame(
  name = c("Alice", "Bob", "Charlie", "David"),
  age = c(25, 30, 35, 40),
  salary = c(50000, 60000, 70000, 80000)
)

# 使用dplyr的arrange()函数按照年龄降序排序，并使用row_number()获取行号
df_sorted <- df %>%
  arrange(desc(age)) %>%
  mutate(row_number = row_number())

# 打印排序后的数据框
print(df_sorted)

     name age salary row_number
1   David  40  80000          1
2 Charlie  35  70000          2
3     Bob  30  60000          3
4   Alice  25  50000          4