Necesito repetir 100 veces un vector de 16 números: este vector tiene algunas posición unos números fijados y otros se generan aleatoriamente. He creado una función para repetir este vector 100 veces, pero simplemente me copia el 1r vector 100 veces, y no me genera nuevos números aleatorios, simplemente copia los aleatorios creados la 1a vez.
r1<- c(1,3,2,1,2,sample(1:4,1,replace=T),4,sample(1:4,1,replace=T),3,sample(1:4,1,replace=T),
sample(1:4,1,replace=T),2,sample(1:4,1,replace=T),1,sample(1:4,1,replace=T),3)
rep.row<-function(x,n){
matrix(rep(r1,each=100),nrow=100)
}
rp <- rep.row(r1)
Como podría obtener 100 vectores, manteniendo la aleatoriedad en los lugares deseados?
Saludos y muchas gracias,