Bootstrapping de la edad materna media
La edad materna, o la edad de la madre en el momento de dar a luz, es un marcador importante de la salud natal en una población. Una edad materna demasiado alta o demasiado baja puede tener efectos adversos en el resultado del parto.
Trabajas para el Departamento de Salud US como Analista de Datos. Se te da una lista, ls_df, de 51 marcos de datos, uno por cada estado US y Washington DC. Cada marco de datos contiene la columna maternal_age. Tu jefe quiere que hagas un bootstrap de la distribución de la edad materna media de cada estado. Ya has escrito un bucle para hacer el bootstrap en un único marco de datos. Necesitas paralelizar este cálculo. Se ha cargado para ti el paquete parallel.
Este ejercicio forma parte del curso
Programación paralela en R
Instrucciones del ejercicio
- Envuelve el bucle bootstrap en una función que devuelva la distribución de la media.
- Configura un clúster de cuatro núcleos.
- Aplica la función bootstrap a
ls_dfen paralelo utilizandoparLapply(). - Detén el clúster una vez realizados todos los cálculos.
ejercicio interactivo práctico
Prueba este ejercicio completando este código de ejemplo.
# Wrap the loop into a function
boot_mean <- ___ (df) ___
est <- rep(0, 1e3)
for (i in 1:1e3) {
b <- sample(df$mother_age, replace = T)
est[i] <- mean(b)
}
return(est)
___
# Make a cluster of four
cl <- ___
# Apply function to ls_df in parallel
state_dist <- ___
# Stop cluster
___(cl)