2017-01-10 3 views
1

Kann mir bitte jemand mit einer einfachen Lösung für dieses Problem helfen. Zum Beispiel Ich habe einen Datenrahmen:Wiederhole Reihen von Datenrahmen mit unterschiedlicher Kennung

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

Ich mag für jede Wiederholung aller Zeilen in dem Datenrahmen 30-mal mit einer anderen „ID“ wiederholen. Z.B. für ID<-c("1002","1005","1009"...) Ich habe aufgestanden:

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

aber ich kann nicht herausfinden, wie für jede Wiederholung der ID zu ändern. Danke im Voraus!

Antwort

0

Es ist nicht klar, über die Länge der "ID" Vektor.

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

Oder wenn wir ein Kreuz beitreten müssen

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

Siehe ?expand.grid

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