r - R中数据框中的重复行

Question

我正在尝试使用下面的代码复制数据框中的行。
但是，我发现它很慢。

duprow = df[1,]
for(i in 1:2000)
{
    print(i)
    df = rbind(df,duprow)
}

有没有更快的方法？

Answer 1

您可以使用rep，例如5个重复项或第1行:

df <- data.frame(x = 1, y = 1)
rbind(df, df[rep(1, 5), ])
#     x y
# 1   1 1
# 11  1 1
# 1.1 1 1
# 1.2 1 1
# 1.3 1 1
# 1.4 1 1