在R中按组创建有序ID

Question

如果已在其他地方得到解答，请提前道歉，我看了但是找不到我需要的东西。

我需要按组创建一个有序的id变量，所以从这样的数据集开始：

Data <- data.frame(
group = c("A", "B", "B", "B", "A"),
x = c(1, 2, 3, 4, 5),
y = c(1, 2, 2, 2, 1))

对于这样的数据集：

  group x y  id
1     A 1 1   1
2     B 2 2   1
3     B 3 2   2
4     B 4 2   3
5     A 5 1   2

我知道必须有一个简单的方法，但我无法弄明白。