在新向量中复制数据帧的行

Question

我有一列这样的数据：

Initcol <- data.frame(colnames(blocA))

这导致了这个

1 AUSc1
2 AUSc2
3 AUSc3
4 AUSc4
5 AUSc5
6 AUSc6
7 AUSc7
8 AUSc8
9 AUSc9
10 AUSc10

我想创建一个像这样的新数据框：

1 AUSc1
2 AUSc1
3 AUSc1
4 AUSc2
5 AUSc2

基本上重复每个时间线i x次。

我试过了：

col <- as.data.frame(matrix(NA,nrow=3*10,ncol=1))
for (i in 1:3) {
  idx = floor(i/10)
  col[idx,] <- Initcol$colnames.blocA.[idx,]
}

但是我收到了错误

  

[.default（Initcol $ colnames.blocA。，idx，）中的错误：不正确   维数

那我怎么能让它发挥作用呢？

Answer 1

我认为unlist(lapply())应该完成这项工作。

v <- 1:10
v2 <- unlist(lapply(v, rep, 3))
v2