sowc_maternal_newborn {openintro}

SOWC Maternal and Newborn Health Data.

Description

Data from UNICEF's State of the World's Children 2019 Statistical Tables.

Usage

sowc_maternal_newborn

Format

A data frame with 202 rows and 18 variables.

countries_and_areas

Country or area name.

life_expectancy_female

Life expectancy: female in 2018.

family_planning_1549

Demand for family planning satisfied with modern methods (%) 2013–2018 Women aged 15 to 49.

family_planning_1519

Demand for family planning satisfied with modern methods (%) 2013–2018 Women aged 15 to 19.

adolescent_birth_rate

Adolescent birth rate 2013 to 2018.

births_age_18

Births by age 18 (%) 2013 to 2018.

antenatal_care_1

Antenatal care (%) 2013 to 2018 At least one visit.

antenatal_care_4_1549

Antenatal care (%) 2013 to 2018 At least four visits Women aged 15 to 49.

antenatal_care_4_1519

Antenatal care (%) 2013 to 2018 At least four visits Women aged 15 to 19.

delivery_care_attendant_1549

Delivery care (%) 2013 to 2018 Skilled birth attendant Women aged 15 to 49.

delivery_care_attendant_1519

Delivery care (%) 2013 to 2018 Skilled birth attendant Women aged 15 to 19.

delivery_care_institutional

Delivery care (%) 2013 to 2018 Institutional delivery.

c_section

Delivery care (%) 2013–2018 C-section.

postnatal_health_newborns

Postnatal health check(%) 2013 to 2018 For newborns.

postnatal_health_mothers

Postnatal health check(%) 2013 to 2018 For mothers.

maternal_deaths_2017

Maternal mortality 2017 Number of maternal deaths.

maternal_mortality_ratio_2017

Maternal mortality 2017 Maternal Mortality Ratio.

risk_maternal_death_2017

Maternal mortality 2017 Lifetime risk of maternal death (1 in X).

Source

United Nations Children's Emergency Fund (UNICEF)

Examples

library(dplyr)
library(ggplot2)

# List countries and lifetime risk of maternal death (1 in X), ranked
sowc_maternal_newborn |>
  mutate(rank = round(rank(risk_maternal_death_2017), 0)) |>
  select(countries_and_areas, rank, risk_maternal_death_2017) |>
  arrange(rank)

# Graph scatterplot of Maternal Mortality Ratio 2017 and Antenatal Care 4+ Visits %
sowc_maternal_newborn |>
  select(antenatal_care_4_1549, maternal_mortality_ratio_2017) |>
  remove_missing(na.rm = TRUE) |>
  ggplot(aes(antenatal_care_4_1549, maternal_mortality_ratio_2017)) +
  geom_point(alpha = 0.5) +
  labs(
    title = "Antenatal Care and Mortality",
    x = "Antenatal Care 4+ visits %",
    y = "Maternal Mortality Ratio"
  )