Não consegui encontrar resposta para esta pergunta em R. Gostaria de gerar uma amostra aleatória de 'RandomSample' de 0 a 1. Para cada amostra, eu gostaria de ter um número específico de valores 'numval', que é derivado do comprimento do vetor 'Prob'. 'Prob' está me dando um valor de probabilidade de que cada ponto individual seja 0 ou 1. Portanto, neste caso, o primeiro número terá o valor prob de 0,9 sendo 1 e 0,1 sendo 0. E assim por diante. Então, eu gostaria de repetir a geração aleatória de amostras 1000 vezes. Eu tenho um script (abaixo) gerando 0 e 1 aleatórios, mas estou faltando componente em fornecer os valores de probabilidade. A ajuda será muito apreciada - sou bastante novo para R.

Prob <- c(0.9, 0.3, 0.6, 0.8, 0.23, 0.45, 0.1, 0.3, 0.5, 0.03)
RandomSample <- list()
zeroones <- c(0,1)
rep = 1000
numval <- length(Prob)

for (i in 1:rep) RandomSample[[i]] <- c(sample(zeroones,numval,replace = TRUE))
t(sapply(RandomSample, unlist, simplify = TRUE))