It's easy to repeat a data.frame once,
mt2 <- rbind(mtcars, mtcars)
But what's an R-like way to do this generally? If I want 10 copies of mtcars
together I could
mt10 <- mtcars
for (i in 2:10) mt10 <- rbind(mt10, mtcars)
which is plenty concise, but seems not in the spirit of R. Is there a better way to do this, or a clever trick using vector recycling?
Here's a very simple method:
mtcars[rep(1:nrow(mtcars),2),]
or using better "grammar":
mtcars[rep(seq_len(nrow(mtcars)),2),]
As GSee notes below, one difference here is that rbind
will replicate the row names exactly, while using indexing will force unique row names by appending digits. Off the top of my head, I think the only fix would be to set the row names (again using rep
) after the fact.
@joran's answer is very elegant and you should use it if duplicating the rownames isn't required. However, this way will also duplicate the rownames:
do.call(rbind, replicate(10, mtcars[1:10, ], simplify=FALSE))
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With