Data Importation

#Table_1 Characterics of socio Demographics

## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.4     ✔ readr     2.1.5
## ✔ forcats   1.0.0     ✔ stringr   1.5.1
## ✔ ggplot2   3.5.1     ✔ tibble    3.2.1
## ✔ lubridate 1.9.4     ✔ tidyr     1.3.1
## ✔ purrr     1.0.4     
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
Characteristic N = 6001
age 26 (19, 34)
gender
    female 310 (52%)
    male 290 (48%)
facility
    DASH 160 (27%)
    FMC Abuja 20 (3.3%)
    KGH 170 (28%)
    NGH 70 (12%)
    NIPRID 70 (12%)
    SON 70 (12%)
    UATH 40 (6.7%)
education
    primary 60 (10%)
    secondary 120 (20%)
    tertiary 420 (70%)
marital_status
    divorced 90 (15%)
    married 240 (40%)
    single 270 (45%)
1 Median (Q1, Q3); n (%)

#Table_2 Characterics of socio Demographics by outcome

Characteristic negative
N = 2801		 positive
N = 3201		 Overall
N = 6001
age 29 (21, 39) 24 (18, 31) 26 (19, 34)
gender


    female 160 (52%) 150 (48%) 310 (100%)
    male 120 (41%) 170 (59%) 290 (100%)
facility


    DASH 50 (31%) 110 (69%) 160 (100%)
    FMC Abuja 10 (50%) 10 (50%) 20 (100%)
    KGH 80 (47%) 90 (53%) 170 (100%)
    NGH 40 (57%) 30 (43%) 70 (100%)
    NIPRID 20 (29%) 50 (71%) 70 (100%)
    SON 50 (71%) 20 (29%) 70 (100%)
    UATH 30 (75%) 10 (25%) 40 (100%)
education


    primary 20 (33%) 40 (67%) 60 (100%)
    secondary 60 (50%) 60 (50%) 120 (100%)
    tertiary 200 (48%) 220 (52%) 420 (100%)
marital_status


    divorced 20 (22%) 70 (78%) 90 (100%)
    married 170 (71%) 70 (29%) 240 (100%)
    single 90 (33%) 180 (67%) 270 (100%)
1 Median (Q1, Q3); n (%)

Day-3 #create by multiplyig the age of each by 5

#Creating Age group

#proportion of children

Characteristic negative
N = 2801		 positive
N = 3201
Age_Group

    Adult 220 (79%) 240 (75%)
    Children 60 (21%) 80 (25%)
1 n (%)

more than two categories

#Proportion of Teenager Positive for Malaria

Characteristic negative
N = 2801		 positive
N = 3201		 Overall
N = 6001
AgeGroup


    Adult 100.0 (76.9%) 30.0 (23.1%) 130.0 (100.0%)
    Children 50.0 (62.5%) 30.0 (37.5%) 80.0 (100.0%)
    Teens 10.0 (16.7%) 50.0 (83.3%) 60.0 (100.0%)
    Youth 120.0 (36.4%) 210.0 (63.6%) 330.0 (100.0%)
1 n (%)

Calculate BMI2

BMI2 WHO STATUS

#Using WHO CLASSIFICATION CLASSIFY BMI_STATUS

Characteristic N = 6001
BMI_STATUS
    Normal weight 131.0 (21.8%)
    Obesity Class I 125.0 (20.8%)
    Obesity Class II 90.0 (15.0%)
    Obesity Class III 73.0 (12.2%)
    Pre-Obesity 167.0 (27.8%)
    Underweight 14.0 (2.3%)
1 n (%)

#function in R

#Proportion without Underweight and Normal Weight

Characteristic N = 4551
BMI_STATUS
    Obesity Class I 125.0 (27.5%)
    Obesity Class II 90.0 (19.8%)
    Obesity Class III 73.0 (16.0%)
    Pre-Obesity 167.0 (36.7%)
1 n (%)

#filter

Characteristic N = 4551
BMI_STATUS
    Obesity Class I 125.0 (27.5%)
    Obesity Class II 90.0 (19.8%)
    Obesity Class III 73.0 (16.0%)
    Pre-Obesity 167.0 (36.7%)
1 n (%)

#another 3

Characteristic N = 4551
BMI_STATUS
    Obesity Class I 125.0 (27.5%)
    Obesity Class II 90.0 (19.8%)
    Obesity Class III 73.0 (16.0%)
    Pre-Obesity 167.0 (36.7%)
1 n (%)

#Rename

#Hypertension status

#Proportion Hypertensive

Characteristic N = 6001
Hypertension_Status
    Hypertensive 600.0 (100.0%)
1 n (%)