-
Notifications
You must be signed in to change notification settings - Fork 1
/
08-underweight.Rmd
96 lines (47 loc) · 1.58 KB
/
08-underweight.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
# Underweight descriptive statistics {#underweight}
---
output:
pdf_document:
keep_tex: yes
fontfamily: mathpazo
fontsize: 9pt
---
\raggedright
```{r setup1, include=FALSE}
source(paste0(here::here(), "/0-config.R"))
library(knitr)
knitr::opts_chunk$set(echo = TRUE)
tab <- readRDS(paste0(fig_dir,"underweight/figure-data/all-figdata.RDS"))
```
## Weight-for-age Z-score (WAZ)
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-wlz-2-mean-overall_region--allage-primary.png"))
```
## Age-specific prevalence
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-underweight-2-prev-overall_region--allage-primary.png"))
```
## Age-specific incidence
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-underweight-2-inc-overall_region--allage-primary.png"))
```
## Age-specific incidence rate
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-underweight-2-ir-overall_region--allage-primary.png"))
```
## Age-specific recovery
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-underweight-2-rec-overall_region--allage-primary.png"))
```
## Age-specific prevalence of severe underweight
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-underweight-3-prev-overall_region--allage-primary.png"))
```
## Age-specific longitudinal prevalence of persistent underweight
```{r, echo = FALSE}
include_graphics(paste0(fig_dir,"underweight/fig-persunderweight.png"))
```
## Table of all underweight results
```{r, echo=F, warning=F, message=F}
DT::datatable(tab)
```