Reproducir el bootstrap
Trabajas para una agencia de valores online. Tu empresa está desarrollando una aplicación para Android que proporciona rangos de precios generales para las acciones que vende la empresa. Dispones de una función de bootstrapping, boot_price(), para calcular rangos de precios mensuales.
Para probar la reproducibilidad de esta función en paralelo, has decidido aplicar esta función a cada elemento de una lista, ls_micro. Cada elemento de esta lista es un vector de precios medios diarios de las acciones de Microsoft para un mes determinado.
Se ha cargado para ti el paquete parallel.
Este ejercicio forma parte del curso
Programación paralela en R
Instrucciones del ejercicio
- Establece un valor de semilla de
321para que el clustercl1realice la primera ejecución. - Establece el mismo valor de semilla para el cluster
cl2para hacer la segunda ejecución. - Comprueba si las salidas
result1yresult2son iguales.
ejercicio interactivo práctico
Prueba este ejercicio completando este código de ejemplo.
cl1 <- makeCluster(4)
# Set 321 as the seed value for the first run
___(___, ___)
result1 <- parLapply(cl1, ls_micro, boot_price)
stopCluster(cl1)
cl2 <- makeCluster(4)
# Set the same seed value for the second run
___(___, ___)
result2 <- parLapply(cl2, ls_micro, boot_price)
stopCluster(cl2)
# Test if outputs are the same
___(___, ___)