Bucle con foreach
El Departamento de Salud de US ha recibido informes sobre una mayor tasa de resultados adversos durante el parto. Quieres investigar si esta tendencia se debe a una edad materna baja o alta. Tu equipo ha obtenido el conjunto de datos de nacimientos del año anterior. Tienes una lista, ls_age. Cada elemento de esta lista es un vector de la edad de la madre para cada nacimiento registrado en un estado US.
El siguiente bucle calcula el porcentaje de nacimientos en un estado en el que la edad materna es inferior a 20 o superior a 35 años:
at_risk_perc <- rep(NA, length(ls_age))
for (m in 1:length(ls_age)) {
at_risk_perc[m] <-
sum(ls_age[[m]] > 35 | ls_age[[m]] < 20) * 100/length(ls_age[[m]])
}
Sin embargo, esto está llevando demasiado tiempo y quieres probar otras opciones. foreach Se han cargado para ti las páginas parallel y doParallel.
Este ejercicio forma parte del curso
Programación paralela en R
ejercicio interactivo práctico
Prueba este ejercicio completando este código de ejemplo.
# Specify input to loop over
at_risk_perc <- foreach(m = ___
# Specify the sequential operator
) ___ {
sum(m > 35 | m < 20) * 100/length(m)}