如何在R中为同一组的行赋予相同的连续编号？

当然有啦！在R里有好几种简单高效的方法可以实现你的需求——给具有相同旧Number值的观测分配连续的新编号，下面给你介绍几种最常用的方案：

方法1：用dplyr（tidyverse生态）快速实现 #

如果你习惯用tidyverse系列工具，dplyr的group_indices()函数可以直接搞定：

library(dplyr)

# 假设你的原始数据框名为df
df <- df %>%
  mutate(Number = group_indices(., Number))

这个函数会自动识别Number列的不同分组，给每个组分配从1开始的连续整数编号，完全匹配你想要的效果。

方法2：基础R原生解法（无需额外包） #

不想加载第三方包的话，利用因子（factor）的特性就能实现：

# 直接转换（默认按分组的自然顺序编号）
df$Number <- as.numeric(factor(df$Number))

# 如果需要严格按照分组首次出现的顺序编号，加上levels参数
df$Number <- as.numeric(factor(df$Number, levels = unique(df$Number)))

原理是：因子会把每个不同的Number值标记为一个“水平”，转换成数值型后，这些水平就会变成从1开始的连续整数。

方法3：data.table（适合大数据场景） #

如果你的数据量很大，用data.table的方法会更高效：

library(data.table)

setDT(df)[, Number := .GRP, by = Number]

这里的.GRP是data.table的内置变量，会给每个by指定的分组分配一个连续的编号，处理速度比基础方法快很多。

验证效果 #

用你给出的示例数据测试后，所有相同旧Number的行都会得到相同的新编号，最终结果和你期望的完全一致：

内容的提问来源于stack exchange，提问作者8k14