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

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$ columns . bloca .)错误。， idx，):不正确尺寸数

那么我怎么才能让它工作呢?

Answer 1

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

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