2017-01-10 54 views
1

有人可以帮助我解决这个问题的简单解决方案。 例如我有一个数据帧:用不同的标识符重复数据帧的行

data<-data.frame(ID=1,Time=1:10,C="A") 

我想用不同的“ID”重复数据帧中的所有行30次,每次复制。例如。对于ID<-c("1002","1005","1009"...) 我已经得到了高达:

new<-data[rep(seq_len(nrow(data)),times=30), ] 

,但我想不出如何更改ID为每个重复。提前致谢!

回答

0

目前尚不清楚关于 “ID” 向量的长度。

ID <- 1002:1030 
data$ID <- ID[seq_len(nrow(data))] 
data1 <- data[rep(seq_len(nrow(data)),times=30), ] 

或者,如果我们需要一个交叉连接

library(data.table) 
CJ(ID, data$Time, "A") 
0

参见?expand.grid

data <- expand.grid(ID = 1:30, Time = 1:10, C = 'A')