04-age-at-first-measurement.Rmd

# Analyses of age at first measurement {#age-meas}

---
output:
  pdf_document:
    keep_tex: yes
fontfamily: mathpazo
fontsize: 9pt
---

\raggedright

Our analyses of stunting incidence assumed that children whose first measurement occurred after birth were assumed to have experienced stunting onset at the age halfway between birth and the first measurement. To assess the extent to which this assumption influenced our estimates, we plotted the distribution of age at first measurement and the age at enrollment. The vast majority of children were enrolled close to birth, and the majority were less than 5 days of age at their first measurement. 

```{r setup, include=FALSE}
library(knitr)
knitr::opts_chunk$set(echo = TRUE)
source(paste0(here::here(), "/0-config.R"))
```

## Histogram of first measurement within age 0-30 days

### All cohorts
```{r age-first, echo = FALSE}
include_graphics(paste0(fig_dir, "/shared/age_histogram_first_month.png"))
#include_graphics("figure-copies/age_histogram_first_month.png")
```

### Cohort-stratified
```{r age-first-cohort, echo = FALSE}
include_graphics(paste0(fig_dir, "/shared/age_histogram_first_month_cohort.png"))
#include_graphics("figure-copies/age_histogram_first_month_cohort.png")
```



## Histogram of age at enrollment

### All cohorts
```{r age-enr, echo = FALSE}
include_graphics(paste0(fig_dir, "/shared/enrollment_age_histogram_over_7d.png"))
#include_graphics("figure-copies/enrollment_age_histogram_over_7d.png")
```

### Cohort-stratified
```{r age-enr-cohort, echo = FALSE}
include_graphics(paste0(fig_dir, "/shared/enrollment_age_histogram_over_7d_cohort.png"))
#include_graphics("figure-copies/enrollment_age_histogram_over_7d_cohort.png")
```