1

我有一个data这样的数据框:

No. count   gender
23  2   Male
52  4   Female
75  3   Female

我想插入增加的行,No.如下所示:

No. count   gender
23  2   Male
24  2   Male
52  4   Female
53  4   Female
54  4   Female
55  4   Female
56  4   Female
75  3   Female
76  3   Female
77  3   Female

我试过这个z <- data[rep(seq(nrow(data)), data[,2]), ] ,但这只是应付它。如何在数据框中插入带增量的行?

谢谢

4

1 回答 1

1

只需再增加一个步骤来增加“否”。柱子:

z <- data[rep(seq(nrow(data)), data[,2]), ]
z$No. <- z$No. + sequence(data[, 2]) - 1
z
#     No. count gender
# 1    23     2   Male
# 1.1  24     2   Male
# 2    52     4 Female
# 2.1  53     4 Female
# 2.2  54     4 Female
# 2.3  55     4 Female
# 3    75     3 Female
# 3.1  76     3 Female
# 3.2  77     3 Female
于 2014-03-09T04:46:59.337 回答