No pude encontrar la respuesta para esta pregunta en R. Me gustaría generar una muestra aleatoria de 'RandomSample' de 0 a 1. Para cada muestra, me gustaría tener un número específico de valores 'numval' que se deriva de la longitud del vector 'Prob'. 'Prob' me está dando un valor de probabilidad de que cada punto individual sea 0 o 1. Entonces, en este caso, el primer número tendrá un valor prob de 0.9, siendo 1, y 0.1, siendo 0. Y así sucesivamente. Entonces, me gustaría repetir la generación de muestras aleatorias 1000 veces. Tengo un script (a continuación) que genera 0 y 1 aleatorios, pero me falta el componente para dar los valores de probabilidad. La ayuda será muy apreciada. Soy bastante nuevo en 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))