olá amigos do R,

 

da matriz data abaixo, preciso de formar uma matriz com 1000 linhas onde cada linha da nova matriz é exatamente uma das linhas da matriz data, estou usando o código abaixo mas não estu conseguindo, alguém pode ajudar?

 

data
     [,1] [,2] [,3] [,4]
[1,]    1    0    0    1
[2,]    0    1    0    0
[3,]    1    1    1    0
[4,]    1    1    1    1
[5,]    1    1    0    1
[6,]    0    0    0    1
[7,]    0    0    0    0

 

simulacao<- data[sample(7, 1),  ] # amostrar  linha  da matriz
simulacao

n<-1000
simulacao<-NULL
padrao<-NULL
for(i in 1:n){
 simulacao[i]<-data[sample(7, 1),  ]
 y<-simulacao[i]
 padrao<-matrix(y,nrow=n,ncol=4,byrow=FALSE)
 }
padrao