r有条件地复制数据帧中的行

Question

我的数据框如下所示：

SIT LOC NB VAL
A a 1 0.256
A b 451 0.023
B a 2 0.123
B b 1 0.741

我想将行复制NB次。例如，我希望第二行被复制451次。然后，我将不再需要“NB”列，这简化了聚合等功能的使用。

Answer 1

对rep使用子集：

DF <- read.table(text="SIT LOC NB VAL
A a 1 0.256
A b 451 0.023
B a 2 0.123
B b 1 0.741", header=TRUE)

DFrep <- DF[rep(seq_len(nrow(DF)), DF$NB),]