k <- 8
m = 100
for (i in 1:k){
x <- rnorm(mean = i,
sd = .5,
n=m)
y <- rnorm(mean = (8-i),
sd = .5,
n=m)
amostra2 <- data.frame(x,y)
}
Esse é o código que eu tenho. Dado k e m, eu gero valores normalmente distribuídos e os salvo em um data frame. O problema é que desse jeito o loop só reescreve os valores de x e y, quando eu queria "appenda-los", de forma que o comprimento de cada vetor fosse no final k*m (o número de rodadas * a amostra gerada em cada uma).
ATUALIZAÇÂO
for (i in 1:k){
x <- rnorm(mean = i,
sd = .5,
n=m)
y <- rnorm(mean = (8-i),
sd = .5,
n=m)
assign(paste("amostra_for_",i, sep=""),
value = data.frame(x,y))
}
for (i in 2:k) {
amostra2 <- rbind(amostra_for_1,
paste("amostra_for_",i))
}
Agora eu consegui gerar tudo que precisava em k data.frames diferentes, o problema é unir todos os DFs.