df <- data.frame(a = 1:2, b = letters[1:2]) df[rep(seq_len(nrow(df)), each = 2), ]
1.4m articles
1.4m replys
5 comments
56.9k users