r - R中基于最大数量的回填数据框

Question

我有一个包含多个 ID 和最大值的数据框。

df <- data.frame(id = c("a", "b", "c"), max.number = c(0, 6, 4))

  id max.number
1  a          0
2  b          6
3  c          4

我想创建一个新的数据框，为每个 ID 回填到零。它看起来像:

  id     number
1  a          0
2  b          0
3  b          1
4  b          2
5  b          3
6  b          4
7  b          5
8  b          6
9  b          0
10 c          1
11 c          2
12 c          3
13 c          4

我曾尝试通过嵌套的 for 循环来执行此操作，但无法使其正常工作。如果可能的话，我希望在使用 apply 时获得一些指导。

Answer 1

使用 data.table 会很容易表:

# install.packages("data.table")
library(data.table)

df <- data.frame(id = c("a", "b", "c"), max.number = c(0, 6, 4))
dt <- as.data.table(df) 
# or directly: 
# dt <- data.table(id = c("a", "b", "c"), max.number = c(0, 6, 4))
dt[, .(number=seq(0, max.number)), by=id]

输出:

    id number
 1:  a      0
 2:  b      0
 3:  b      1
 4:  b      2
 5:  b      3
 6:  b      4
 7:  b      5
 8:  b      6
 9:  c      0
10:  c      1
11:  c      2
12:  c      3
13:  c      4