PHC Withdrawal Analysis (Jan–June 2025)

Load Data

finance <- read_csv("cleaned_finance.csv")
submission <- read_csv("summary_submission.csv")

# Convert date
finance <- finance %>%
  mutate(
    DATE = as.Date(DATE, format = "%d-%b-%y"),
    AMOUNT = parse_number(as.character(AMOUNT))
)

balance <- read_csv("cleaned_balance.csv") %>%
  mutate(
    BALANCE = parse_number(as.character(BALANCE))
    )

#view(finance)

PHCs that did NOT submit bank statement

submission %>%
  arrange(LGA, PHC) %>%
  flextable() %>%
  autofit()

SN	LGA	PHC	OIC	...5
1	ANINRI	COMPRENSIVE MPU	OGBONNA MERCY
2	ANINRI	UHUEZE OBEAGU H/C	AJA MARIA
3	AWGU	UGWULESHI H/C	Ndie Grace Ngozichukwuka
4	ENUGU NORTH	CPS HC	Ezeokpe Ngozi Edith
5	EZEAGU	OKPOGHO	MGBACHI NKIRUKA EUCHARIA
6	ISI UZO	EHA-AMUFU	AGBOEZE JULIANA ONYEJEREBECHI
7	ISI UZO	IKPAKPARA H/P	ANI ESTHER
8	ISI UZO	UMUJIOVU H/P	UGWUANYI ANGELA MGBEOSORO
9	NKANU EAST	OVUORIE H/C	EKWE BRIDGET ULOMA
10	NSUKKA	ELU-AGU OBUKPA H/C	Ugwu Ngozi Charity
11	NSUKKA	IHE H/C	MADU JOY
12	NSUKKA	OKPUJE H/P	UGWUOKE ESTHER
13	OJI RIVER	AGBALAENYI H/C	ILO THERESAR IFEOMA
14	OJI RIVER	ENUGWU INYI H/C	NNEKA PATRICIA ONWUKWE
15	OJI RIVER	UTAZI UGWA H/C	MADUBUKO GLADYS OBIAGELI
16	UDENU	IBAGWA EZIMO H/C	EZE GRACE CHINYERE
17	UZO UWANI	ADABA H/C	IJEGALU EDITH CHINYERE

# ₦

1. Total withdrawals by all PHCs from Jan to May 2025

# Main summary
phc_summary <- finance %>%
  group_by(LGA, PHC) %>%
  summarise(
    Withdrawal_Count = n(),
    Average_Amount = round(mean(AMOUNT, na.rm = TRUE), 2),
    Total_Withdrawn = sum(AMOUNT, na.rm = TRUE),
    .groups = "drop"
  ) %>%
  arrange(LGA, desc(Total_Withdrawn)) %>%
  mutate(RowNumber = row_number()) %>%
  relocate(RowNumber, .before = LGA)

# Remove old S.N column if it exists
phc_summary <- phc_summary %>%
  select(-any_of("S.N"), -any_of("S/N")) %>%
  rename(`S/N` = RowNumber)

# Add total row (force character for factor columns like PHC)
total_row <- data.frame(
  `S/N` = NA,
  LGA = "TOTAL",
  PHC = as.character(NA),
  Withdrawal_Count = sum(phc_summary$Withdrawal_Count, na.rm = TRUE),
  Average_Amount = round(mean(phc_summary$Average_Amount, na.rm = TRUE), 2),
  Total_Withdrawn = sum(phc_summary$Total_Withdrawn, na.rm = TRUE),
  check.names = FALSE
)

# Bind total row
phc_summary_with_total <- bind_rows(total_row, phc_summary)

# Show final table
flextable(phc_summary_with_total) %>%
  autofit() %>%
  bold(i = 1, bold = TRUE) %>%
  italic(i = 1, italic = TRUE)

S/N	LGA	PHC	Withdrawal_Count	Average_Amount	Total_Withdrawn
	TOTAL		1,189	124,922.25	139,252,344
1	ANINRI	ODUMA BASIC HEALTH CENTRE	10	126,000.00	1,260,000
2	ANINRI	EMUDO HEALTH CENTRE BHCPF	9	118,888.89	1,070,000
3	ANINRI	ODUMA ACHARA HEALTH CENTRE	4	252,500.00	1,010,000
4	ANINRI	UHUEZE OBEA HEALTH CENTRE	4	236,750.00	947,000
5	ANINRI	NENWE HEALTH CENTRE BHCPF	4	228,975.00	915,900
6	ANINRI	NDUMEZE HEALTH CENTRE BHCPF	2	336,500.00	673,000
7	ANINRI	AGBADA NENWE HEALTH CENTRE	3	163,600.00	490,800
8	ANINRI	AGBOECHARA HEALTH CENTRE	1	400,000.00	400,000
9	AWGU	MGBOWO HEALTH CENTRE	4	299,550.00	1,198,200
10	AWGU	OWELLI BH	6	182,533.33	1,095,200
11	AWGU	AFFAM MMAKU	4	227,650.00	910,600
12	AWGU	UGWUEME HEALTH CENTRE	5	137,000.00	685,000
13	AWGU	IHE HEALTH CENTRE	4	162,500.00	650,000
14	AWGU	OBEAGU	5	110,140.00	550,700
15	AWGU	MCH AWGU	2	262,500.00	525,000
16	AWGU	ISUAWA HEALTH CENTRE	4	109,757.00	439,028
17	AWGU	OGBAKU HEALTH CENTRE	4	109,500.00	438,000
18	AWGU	AGBOGUGU	2	151,500.00	303,000
19	ENUGU EAST	ABAKPA HC	9	264,444.44	2,380,000
20	ENUGU EAST	AMORJI HC	13	92,384.62	1,201,000
21	ENUGU EAST	AMOKPO HC	5	199,368.00	996,840
22	ENUGU EAST	UGBO OWA HC	7	141,552.86	990,870
23	ENUGU EAST	UMUNWENE HC	10	93,661.60	936,616
24	ENUGU EAST	UGBOEZEJI HC	6	147,882.33	887,294
25	ENUGU EAST	IBAGWA NIKE HC	7	116,971.43	818,800
26	ENUGU EAST	NCHATANCHA NIKE HC	10	76,660.00	766,600
27	ENUGU EAST	UGWOGO NIKE HC	6	122,833.33	737,000
28	ENUGU EAST	UGWUOMU HC	5	136,980.00	684,900
29	ENUGU EAST	AKO HC	5	96,826.40	484,132
30	ENUGU EAST	UMUCHIGBO HC	5	58,423.00	292,115
31	ENUGU NORTH	CARTER STREET	9	174,222.22	1,568,000
32	ENUGU NORTH	ASATA	3	503,166.67	1,509,500
33	ENUGU NORTH	NEW HAVEN	3	297,000.00	891,000
34	ENUGU NORTH	ARTISAN	5	117,200.00	586,000
35	ENUGU NORTH	COAL CAMP	4	143,706.25	574,825
36	ENUGU NORTH	HILL TOP	6	93,666.67	562,000
37	ENUGU NORTH	UGWU AARON	3	148,133.33	444,400
38	ENUGU NORTH	PHCDA -IND/LAYOUT	2	217,500.00	435,000
39	ENUGU NORTH	OGUI NIKE	2	210,000.00	420,000
40	ENUGU NORTH	GRA WEST	2	116,700.00	233,400
41	ENUGU NORTH	ONUASATA	2	30,000.00	60,000
42	ENUGU NORTH	UMUNEVO	1	10,000.00	10,000
43	ENUGU SOUTH	NDIAGA AMECHI HEALTH CENTRE	3	397,333.33	1,192,000
44	ENUGU SOUTH	AMECHI HEALTH CENTRE	7	161,428.57	1,130,000
45	ENUGU SOUTH	OLOGO HEALTH CENTRE	3	300,000.00	900,000
46	ENUGU SOUTH	SATA HEALTH POST	3	270,000.00	810,000
47	ENUGU SOUTH	ACHARA 2 HEALTH CENTRE	5	108,080.00	540,400
48	ENUGU SOUTH	ACHARA 1 HEALTH POST/BHCPF	4	129,750.00	519,000
49	ENUGU SOUTH	AKWUKE HEALTH CENTRE	5	96,000.00	480,000
50	ENUGU SOUTH	UWANI HEALTH CENTRE	4	111,250.00	445,000
51	ENUGU SOUTH	ENUGU STATE PHCDA-AMAEGBU	5	87,600.00	438,000
52	ENUGU SOUTH	IKIRIKE HEALTH CENTRE	2	205,000.00	410,000
53	ENUGU SOUTH	OBEAGU HEALTH CENTRE	3	118,666.67	356,000
54	ENUGU SOUTH	NDIAGU AMECHI HEALTH CENTRE	1	350,000.00	350,000
55	ENUGU SOUTH	EKE UGWUAJI HEALTH CENTRE/BHCPF	4	42,795.00	171,180
56	EZEAGU	OLO HC	7	114,853.71	803,976
57	EZEAGU	IWOLLO	6	112,790.17	676,741
58	EZEAGU	AGBA UMANA HC	5	133,940.00	669,700
59	EZEAGU	UPATA EZEMA HC	2	330,279.00	660,558
60	EZEAGU	OGULOGU HC	5	116,000.00	580,000
61	EZEAGU	MODEL PRIMARY HEALTH CENTRE	4	130,807.50	523,230
62	EZEAGU	AGOBU UMUMBA HC	3	172,333.33	517,000
63	EZEAGU	OBINOFIA NDIUNO B HC	3	168,891.00	506,673
64	EZEAGU	AKAMA OGHE	3	124,666.67	374,000
65	EZEAGU	AWHA IMEZI HC	3	103,333.33	310,000
66	EZEAGU	AGUOBU OWA	3	93,333.33	280,000
67	EZEAGU	OGWOFIA HC	4	67,300.00	269,200
68	EZEAGU	UMANA NDIUNO HC	3	81,000.00	243,000
69	EZEAGU	NEKE OGHE	4	60,450.00	241,800
70	EZEAGU	OBELEAGU UMANA HC	2	116,000.00	232,000
71	EZEAGU	OZOM MGBAGBU OWA HC	3	69,333.33	208,000
72	EZEAGU	IHUONYIA HC	2	41,250.00	82,500
73	EZEAGU	MGBAGBU-OWA HEALTH CENTRE	1	60,000.00	60,000
74	EZEAGU	UMUMBA NDIUNO HC	1	40,000.00	40,000
75	EZEAGU	OKPOGHO HC	1	10,000.00	10,000
76	IGBO-ETITI	IKOLO HEALTH CENTRE	7	130,907.14	916,350
77	IGBO-ETITI	AKU HEALTH CENTER	8	90,850.00	726,800
78	IGBO-ETITI	OSHIGBO HEALTH CENTRE	7	103,207.86	722,455
79	IGBO-ETITI	UMUOFIAGU HEALTH CENTRE	7	96,148.57	673,040
80	IGBO-ETITI	ENUGU STATE PHCDA-EZI UKEHE BHCPF	7	95,087.71	665,614
81	IGBO-ETITI	OHEMUJE HEALTH CENTRE	8	81,110.12	648,881
82	IGBO-ETITI	IJO HEALTH CENTRE	7	91,450.57	640,154
83	IGBO-ETITI	EKWEGBE HEALTH CENTRE	8	79,670.50	637,364
84	IGBO-ETITI	ENUGU STATE PHCDA-UMUNA BHCPF	7	88,231.71	617,622
85	IGBO-ETITI	OZALLA HEALTH CENTRE	7	88,142.86	617,000
86	IGBO-ETITI	UMUIFO HEALTH CENTRE	8	75,748.12	605,985
87	IGBO-ETITI	AMANEFI HEALTH CENTRE UKEHE	7	83,324.86	583,274
88	IGBO-ETITI	IDOHA HEALTH CENTRE	7	80,577.14	564,040
89	IGBO-ETITI	NUA HEALTH FACILITY AKU	6	89,935.33	539,612
90	IGBO-ETITI	MGBOKO HEALTH CENTRE	6	89,823.33	538,940
91	IGBO-ETITI	ENUGU STATE-PHCDA-OHODO ACHARA BHCP	7	76,500.00	535,500
92	IGBO-ETITI	UWELLE UKEHE HEALTH CENTRE	6	85,780.00	514,680
93	IGBO-ETITI	AMABOKWU MODEL PRY. HEALTH CENTRE	6	82,577.67	495,466
94	IGBO-ETITI	UMUNKO HEALTH CENTRE	7	65,732.00	460,124
95	IGBO-ETITI	OGBEDE HEALTH CENTRE	7	47,660.00	333,620
96	IGBO-EZE NORTH	OGRUTE HEALTH CENTRE	7	235,142.86	1,646,000
97	IGBO-EZE NORTH	AMACHALLA HEALTH CENTRE	8	170,625.00	1,365,000
98	IGBO-EZE NORTH	UMUISHI HEALTH CENTRE	9	119,644.44	1,076,800
99	IGBO-EZE NORTH	UGBAIKE HEALTH CENTRE	8	131,125.00	1,049,000
100	IGBO-EZE NORTH	AMAJA HEALTH CENTRE	5	204,000.00	1,020,000
101	IGBO-EZE NORTH	OLIDO HEALTH CENTRE	6	165,150.00	990,900
102	IGBO-EZE NORTH	UMUOPU HEALTH CENTRE	7	140,680.00	984,760
103	IGBO-EZE NORTH	ETTE HEALTH CENTRE	7	139,714.29	978,000
104	IGBO-EZE NORTH	IGOGORO HEALTH CENTRE	6	150,166.67	901,000
105	IGBO-EZE NORTH	UMUOGBO INYI HEALTH CENTRE	7	124,142.86	869,000
106	IGBO-EZE NORTH	IJEKPE	6	114,300.00	685,800
107	IGBO-EZE NORTH	UMUOGBO ULO HEALTH CENTRE	5	135,935.60	679,678
108	IGBO-EZE NORTH	UMUAGAMA HEALTH CENTRE	8	83,512.50	668,100
109	IGBO-EZE NORTH	AJI HEALTH CENTRE	6	94,166.67	565,000
110	IGBO-EZE NORTH	AMUIFE HEALTH CENTRE	5	98,132.00	490,660
111	IGBO-EZE NORTH	IKPAMODO HEALTH CENTRE	5	79,400.00	397,000
112	IGBO-EZE NORTH	AGUIBEJE HEALTH CENTRE	6	64,900.00	389,400
113	IGBO-EZE NORTH	UMUIDA HEALTH CENTRE	2	84,650.00	169,300
114	IGBO-EZE NORTH	UDA HEALTH CENTRE	3	51,666.67	155,000
115	IGBO-EZE NORTH	ONICHA ENUGU HEALTH CENTRE	2	12,500.00	25,000
116	IGBO-EZE SOUTH	ALOR AGU HEALTH CENTRE	6	147,458.33	884,750
117	IGBO-EZE SOUTH	OVOKO ULO HEALTH CENTRE	7	114,392.86	800,750
118	IGBO-EZE SOUTH	ULUNYA HEALTH CENTRE	6	129,440.00	776,640
119	IGBO-EZE SOUTH	UHUNOWERRE HEALTH CENTRE	7	98,148.57	687,040
120	IGBO-EZE SOUTH	EKOYI HEALTH CENTRE	7	94,648.00	662,536
121	IGBO-EZE SOUTH	OVOKO AJUONA HEALTH CENTRE	7	92,814.29	649,700
122	IGBO-EZE SOUTH	NKALAGU OBUKPA HEALTH CENTRE	7	78,822.86	551,760
123	IGBO-EZE SOUTH	EBURUMIRI HEALTH CENTRE	7	78,612.57	550,288
124	IGBO-EZE SOUTH	IHEAKPU ULO HEALTH CENTRE	7	76,608.00	536,256
125	IGBO-EZE SOUTH	IHEAKA BASIC HEALTH CENTRE	6	88,200.00	529,200
126	IGBO-EZE SOUTH	UNADU HEALTH CENTRE	7	72,056.14	504,393
127	IGBO-EZE SOUTH	IHEAKPU AGU HEALTH CENTRE	7	68,857.14	482,000
128	IGBO-EZE SOUTH	ONYIREGA HEALTH CENTRE	7	53,971.43	377,800
129	IGBO-EZE SOUTH	UMUOGBU HEALTH CENTRE	4	84,450.00	337,800
130	IGBO-EZE SOUTH	ITCHI AGU HEALTH CENTRE	5	64,000.00	320,000
131	IGBO-EZE SOUTH	IBAGWA-AKA HEALTH CENTRE	7	44,007.57	308,053
132	ISI UZO	OGBUZOR HEALTH CENTER	4	176,000.00	704,000
133	ISI UZO	IKEM HEALTH CENTER	6	107,250.00	643,500
134	ISI UZO	UGWUAKPARATA HEALTH CENTER	6	100,500.00	603,000
135	ISI UZO	UGWUADAKA HEALTH CENTER	4	145,000.00	580,000
136	ISI UZO	EBIA HEALTH CENTER	2	150,000.00	300,000
137	ISI UZO	EGERUM HEALTH CENTER	3	84,666.67	254,000
138	NKANU EAST	ORUKU BASIC	9	108,222.22	974,000
139	NKANU EAST	ISIOGBO BHCPF	10	95,839.40	958,394
140	NKANU EAST	IHUOKPARA BHCPF	5	137,560.00	687,800
141	NKANU EAST	NKEREFI ENUOGU	5	118,400.00	592,000
142	NKANU EAST	MBULUOWO BHCPF	9	64,800.00	583,200
143	NKANU EAST	AMUZAM HEALTH CENTRE	7	79,142.86	554,000
144	NKANU EAST	NOMEH HEALTH CENTRE	5	99,000.00	495,000
145	NKANU EAST	NARA HEALTH CENTRE	6	80,694.67	484,168
146	NKANU EAST	AMAFOR UGBAWKA HEALTH CENTRE BHCPF	3	140,000.00	420,000
147	NKANU EAST	AMAGUNZE MODEL HEALTHCARE BHCPF	3	126,666.67	380,000
148	NKANU EAST	UBAHU BHCPF	9	42,000.00	378,000
149	NKANU EAST	NKEREFI HEALTH CENTRE	2	116,567.00	233,134
150	NKANU EAST	MBURUBU HEALTH CENTRE BHCPF	5	38,000.00	190,000
151	NKANU WEST	AGBANI HEALTH CENTRE/BHCPF	3	165,181.67	495,545
152	NKANU WEST	NDIAGU OBUNO HEALTH CENTRE/BHCPF	3	150,000.00	450,000
153	NKANU WEST	AKEGBE UGWU HEALTH CENTRE/BHCPF	4	94,904.00	379,616
154	NKANU WEST	ENUGU STATE PHCDA-AMODU	2	184,970.00	369,940
155	NKANU WEST	OBINAGU UWANI AKPUGO/BHCPF	3	116,833.33	350,500
156	NKANU WEST	AMURRI HEALTH CENTRE/BHCPF	3	112,600.00	337,800
157	NKANU WEST	NDIUNO UWANI HEALTH CENTRE/BHCPF	3	97,704.67	293,114
158	NKANU WEST	ENUGU STATE PHCDA-AMANGWU BHCPF	3	95,066.67	285,200
159	NKANU WEST	ENUGU STATE PHCDA-O EJI NDIUNO	3	93,711.33	281,134
160	NKANU WEST	UMUEZE HEALTH CENTRE/BHCPF	3	88,900.00	266,700
161	NKANU WEST	OZALLA HEALTH CENTRE/BHCPF	3	73,368.67	220,106
162	NKANU WEST	ENUGU STATE PHCDA-O EJI NDIAGUBHCP	1	203,000.00	203,000
163	NKANU WEST	OBE HEALTH CENTRE/BHCPF	3	63,333.33	190,000
164	NKANU WEST	ENUGU STATE PHCDA-OBEAGHU-BHCPF	1	96,000.00	96,000
165	NSUKKA	NSUKKA HEALTH CENTRE	7	190,714.29	1,335,000
166	NSUKKA	OPI HEALTH CENTRE	7	166,000.00	1,162,000
167	NSUKKA	ODORU HEALTH POST	6	171,333.33	1,028,000
168	NSUKKA	EHA NDIAGU HEALTH CENTRE	6	171,088.00	1,026,528
169	NSUKKA	OZI EDEM HEALTH CENTRE	7	122,570.29	857,992
170	NSUKKA	LEJJA HEALTH CENTRE BHCPF	10	79,000.00	790,000
171	NSUKKA	IBEKU OPI HEALTH CENTRE	8	93,137.50	745,100
172	NSUKKA	ALOR UNO HEALTH CENTRE	13	55,623.08	723,100
173	NSUKKA	AKAIBUTE HEALTH CENTRE	5	135,000.00	675,000
174	NSUKKA	OBIMO HEALTH CENTRE	6	108,333.33	650,000
175	NSUKKA	EDEM ANI HEALTH CENTRE	6	104,400.00	626,400
176	NSUKKA	EDE-OBALLA HEALTH CENTRE	7	73,093.71	511,656
177	NSUKKA	EDE-ENU HEALTH CENTRE BHCPF	6	84,166.67	505,000
178	NSUKKA	ISIENU HEALTH CENTRE BHCPF	8	58,687.00	469,496
179	NSUKKA	IBEGWA ANI BHCPF	5	92,000.00	460,000
180	NSUKKA	AGBAMERE BHCPF	6	76,075.67	456,454
181	NSUKKA	NRU HEALTH CENTRE	7	65,148.71	456,041
182	OJI RIVER	ENUGU STATE PHCDA-ELUGWU AKWU BHCPF	2	207,500.00	415,000
183	OJI RIVER	UMUAGU INYI H/C BHCPF	3	134,049.33	402,148
184	OJI RIVER	UGWUOBA HEALTH CENTRE/BHCPF	1	350,000.00	350,000
185	OJI RIVER	EGWU H/C-BHCPF	6	55,330.00	331,980
186	OJI RIVER	BASIC HEALTH CENTRE	2	152,350.00	304,700
187	OJI RIVER	ENUGU STATE PHCDA UMUORI BHCPF	3	100,257.33	300,772
188	OJI RIVER	ISIKWE HEALTH CENTRE/BHCPF	5	57,200.00	286,000
189	OJI RIVER	ENUGU STATE PHCDA-AMANKPUNATO	6	44,500.00	267,000
190	OJI RIVER	ENUGU STATE PHCDA-ALUM INYI BHCPF	2	121,996.00	243,992
191	OJI RIVER	UMULOPU OBUNE H/C-BHCPF	3	52,310.67	156,932
192	OJI RIVER	AGBADALA HEALTH CENTRE/BHCPF	5	27,920.00	139,600
193	OJI RIVER	ENUGU STATE PHCDA-OKWE CENTRAL BH	1	110,000.00	110,000
194	OJI RIVER	MODEL PRIMARY HEALTH CENTRE/BHCPF	1	100,000.00	100,000
195	OJI RIVER	UMUONWU HC	1	100,000.00	100,000
196	OJI RIVER	ENUGU STATE PHCDA-AKPUGOEZE BHCPF	1	90,000.00	90,000
197	OJI RIVER	ENUGU STATE PHCDA-AGUABOSI BH	1	70,000.00	70,000
198	OJI RIVER	AWLAW ETITI HEALTH CENTRE/BHCPF	1	15,000.00	15,000
199	UDENU	OBOLLO EKE	6	209,956.67	1,259,740
200	UDENU	IMILIKE UNO	7	177,485.71	1,242,400
201	UDENU	OBOLLO ETITI	6	201,733.33	1,210,400
202	UDENU	ALGON COMP	5	231,337.40	1,156,687
203	UDENU	AMALLA EGAZI	6	188,000.00	1,128,000
204	UDENU	OBOLLOR AFFOR	6	150,000.00	900,000
205	UDENU	MPHCC ORBA	4	208,000.00	832,000
206	UDENU	OGBODU-ABA	5	95,200.00	476,000
207	UDENU	UMUNDU	3	137,666.67	413,000
208	UDI	NGWO UNO HC	4	464,752.25	1,859,009
209	UDI	NGWOASAA HC	6	162,247.50	973,485
210	UDI	AMOKWE HC	4	225,000.00	900,000
211	UDI	OKUNINO HC	5	153,200.00	766,000
212	UDI	NSUDE HC	6	125,641.67	753,850
213	UDI	UMUOKA HC	4	175,117.50	700,470
214	UDI	UMUABI HC	6	115,816.67	694,900
215	UDI	IKEDIMKPA HC	5	130,660.00	653,300
216	UDI	UMUAGA HC	4	152,510.50	610,042
217	UDI	AMANKWO HC	2	300,000.00	600,000
218	UDI	EZINZE HC	4	137,738.50	550,954
219	UDI	NACHI HC	4	130,815.00	523,260
220	UDI	UKANA HC	2	210,750.00	421,500
221	UDI	0BINAGU HC	4	79,455.00	317,820
222	UDI	OBIOMA HC	3	88,933.33	266,800
223	UDI	UMULUMGBE HC	5	50,000.00	250,000
224	UDI	EBE HC	3	78,980.00	236,940
225	UDI	0KPATU HC	4	55,297.75	221,191
226	UDI	OBINAGU HC	1	58,320.00	58,320
227	UZO UWANI	UMULOKPA HEALTH CENTRE	6	156,583.33	939,500
228	UZO UWANI	ENUGU STATE PHCDA-UGWU UGBENE-BHCPF	6	88,350.00	530,100
229	UZO UWANI	ONUEKE NIMBO HEALTH CENTRE	6	84,333.33	506,000
230	UZO UWANI	UKPATA HEALTH CENTRE	6	80,533.33	483,200
231	UZO UWANI	ABBI BHCPF	6	78,422.33	470,534
232	UZO UWANI	ENUGU STATE PHCDA-NKPOLOGU-BHCPF	4	103,950.00	415,800
233	UZO UWANI	IGGA HEALTH CENTRE	6	64,400.00	386,400
234	UZO UWANI	OGURUGU HEALTH CENTRE	6	64,083.33	384,500
235	UZO UWANI	HEALTH CENTRE UVURU UGWU	5	64,680.00	323,400
236	UZO UWANI	ADANI HEALTH CENTER	5	60,400.00	302,000
237	UZO UWANI	NIMBO HEALTH CENTER	6	50,166.67	301,000
238	UZO UWANI	OJJOR BHCPF	5	50,240.00	251,200
239	UZO UWANI	AKPUGO HEALTH CENTRE-SERVICES ACCOUNT	4	46,125.00	184,500
240	UZO UWANI	MPHC UGBENEAJIM HEALTH CENTRE/BHCPF	3	54,279.00	162,837
241	UZO UWANI	ENUGU STATE PHCDA-NROBO-BHCPF	3	26,333.33	79,000

2b. Breakdown, by LGA, of PHCs where old (transferred or retired) OIC continued to access funds from January to May 2025

get_oic_summary <- function(lga_name) {
  # Compute LGA summary
  df <- finance %>%
    filter(LGA == lga_name) %>%
    filter(!is.na(`OLD OIC`), `OLD OIC` != `NEW OIC`) %>%
    filter(month(DATE) %in% 1:5) %>%
    group_by(PHC, `OLD OIC`, `NEW OIC`) %>%
    summarise(
      Withdrawals_Count = n(),
      Total_Amount = sum(AMOUNT, na.rm = TRUE),
      .groups = "drop"
    ) %>%
    arrange(desc(Total_Amount)) %>%
    mutate(
      `S/N` = row_number(),  # Serial number
      PHC = factor(PHC, levels = PHC)
    ) %>%
    relocate(`S/N`, .before = PHC)

  # Create summary row
  total_row <- data.frame(
    `S/N` = NA,
    PHC = "TOTAL",
    `OLD OIC` = NA,
    `NEW OIC` = NA,
    Withdrawals_Count = sum(df$Withdrawals_Count, na.rm = TRUE),
    Total_Amount = sum(df$Total_Amount, na.rm = TRUE),
    check.names = FALSE 
  )

  # Combine with total
  df_with_total <- bind_rows(total_row, df)

  # Chart (based only on original df, excluding total row)
  ymax <- max(df$Total_Amount) * 1.15

  plot <- ggplot(df, aes(x = PHC)) +
    geom_col(aes(y = Total_Amount), fill = "#0ea5e9") +
    geom_text(aes(y = Total_Amount, label = scales::comma(Total_Amount)), 
              vjust = -0.4, size = 3.2, color = "black") +

    geom_line(aes(y = Withdrawals_Count * ymax / max(Withdrawals_Count)), 
              group = 1, color = "darkred", linewidth = 1) +
    geom_point(aes(y = Withdrawals_Count * ymax / max(Withdrawals_Count)), 
               color = "darkred", size = 2) +
    geom_text(aes(y = Withdrawals_Count * ymax / max(Withdrawals_Count),
                  label = Withdrawals_Count),
              vjust = -0.8, size = 3, color = "darkred") +

    scale_y_continuous(name = "Total Amount (₦)", limits = c(0, ymax),
                       labels = scales::comma_format()) +
    coord_flip() +
    labs(
      title = paste("Illegal Withdrawals from Old OIC of PHC —", lga_name),
      subtitle = "Bars = Total Amount; Line = Number of Withdrawals",
      x = "PHC"
    ) +
    theme_minimal(base_size = 12)

  list(
    table = flextable(df_with_total) %>%
      autofit() %>%
      bold(i = 1, bold = TRUE) %>%
      italic(i = 1, italic = TRUE),
    chart = plot
  )
}

Aninri

res <- get_oic_summary("ANINRI")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			21	3,486,800
1	ODUMA BASIC HEALTH CENTRE	ANI FRANCISCA	UMEAHI JOSHUA	8	1,060,000
2	UHUEZE OBEA HEALTH CENTRE	MBAH HELEN	AJA MARIA	4	947,000
3	ODUMA ACHARA HEALTH CENTRE	ANI SUNDAY	ANYIM VIRGINIA	3	549,000
4	AGBADA NENWE HEALTH CENTRE	OKONKWO VIRGINIA	CHUKWU CELESTINA	3	490,800
5	NENWE HEALTH CENTRE BHCPF	AGOZIEM HELEN	EKWE NNEKA	3	440,000

# Show chart
res$chart

Awgu

res <- get_oic_summary("AWGU")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			31	4,526,928
1	OWELLI BH	AGU MERCY	Chime Justina Chinelo	5	936,200
2	UGWUEME HEALTH CENTRE	IGBOFUNANYA	IGBOFUNANYA MONICA	5	685,000
3	IHE HEALTH CENTRE	OKONKWO FLORENCE	Okafor Francisca Chinwe	4	650,000
4	OBEAGU	OZO THERESA	UCHE LILLIAN	5	550,700
5	MCH AWGU	EKOH FLORENCE	Ikpo Vivian Nwadi	2	525,000
6	ISUAWA HEALTH CENTRE	ENE CHISOMAGA	Felicia Nnamchi(nee Udeuhele) Nkemjika	4	439,028
7	OGBAKU HEALTH CENTRE	OGBODO FLORENCE	Obasiude Jacinta Udochukwu	4	438,000
8	AGBOGUGU	OKAFOR MARIANA	ENE VIOLET	2	303,000

# Show chart
res$chart

Enugu East

res <- get_oic_summary("ENUGU EAST")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			68	7,720,021
1	AMORJI HC	UGWU AMUCHE	NNADOZIE ADAORA ANTHONIA	11	1,003,000
2	AMOKPO HC	OKEKE MERCY	Oguegbe Nkechinyere Ada	5	996,840
3	UMUNWENE HC	ODOH STELLA	AMUJI MARIA	9	836,616
4	UGBO OWA HC	AGU STELLA	Onyia Stella Uju	5	825,770
5	NCHATANCHA NIKE HC	ENEBE CHRISTIANA	ONU CHARITY	10	766,600
6	UGBOEZEJI HC	CHIBUOKE FLORENCE	Agu Ngozi Stella	5	686,048
7	UGWUOMU HC	NZUBENACHI ESTHER	ILOKA RUTH	5	684,900
8	IBAGWA NIKE HC	ONYIA STELLA	Chibuoke Florence	5	663,800
9	UGWOGO NIKE HC	OGUEGBE NKECHINYERE	NGWU THERESA	4	526,000
10	AKO HC	AMUJI MARIA	Catherine Eberechukwu Neboh	5	484,132
11	UMUCHIGBO HC	NNAOZIE ADAORA	EZE CHRISTIANA	4	246,315

# Show chart
res$chart

Enugu North

res <- get_oic_summary("ENUGU NORTH")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			19	3,945,625
1	ASATA	NNEJI MAGGARET	Anodebe Ethel Chioma	1	1,028,000
2	NEW HAVEN	EDEH THERESA	Mbah Eleanor Uzoamaka	3	891,000
3	UGWU AARON	Onu Esther U	Orji Nkiru Agnes	3	444,400
4	PHCDA -IND/LAYOUT	Agu Roseline	Egesi Apollonia Adaobi	2	435,000
5	COAL CAMP	Nnadi Virginia	Nnadi Virginia Uzoamaka	3	423,825
6	OGUI NIKE	ANEKE JULIANA	Ozoebue Nwamaka Martha	2	420,000
7	GRA WEST	Orji Nkiru Agnes	Onu Esther U	2	233,400
8	ONUASATA	EZEOKPE NGOZI EDITH	Eze Gloria Ngozi	2	60,000
9	UMUNEVO	ENEJE EUPHEMIA	Anieke Gloria Adaora	1	10,000

# Show chart
res$chart

Enugu South

res <- get_oic_summary("ENUGU SOUTH")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			31	4,870,180
1	NDIAGA AMECHI HEALTH CENTRE	EDEH MABEL	Ogbaje Gloria Nneka	2	1,059,000
2	AMECHI HEALTH CENTRE	NWANKWO PATRICIA	Ugwu Joy Anulika	6	960,000
3	AKWUKE HEALTH CENTRE	EZE FLORENCE	NWEKE GLADYS AMARACHUKWU	5	480,000
4	ACHARA 2 HEALTH CENTRE	NGENE CHINYERE C.	ONYEMA BLESSING O.	4	450,000
5	ACHARA 1 HEALTH POST/BHCPF	NNAM VICTORIA	Orji Ogochukwu Lilian	3	432,000
6	IKIRIKE HEALTH CENTRE	EGBO REGINA NNENNA	Odoh Justina Ebere	2	410,000
7	NDIAGU AMECHI HEALTH CENTRE	OGBODO FELICIA IFENYINWA	Egbo Regina Nnenna	1	350,000
8	OBEAGU HEALTH CENTRE	EZE AZUKA	Ogbodo Florence N.	2	300,000
9	ENUGU STATE PHCDA-AMAEGBU	OKEKE CHINYERE V.	Okpala Evelyn Obiefo	3	292,000
10	EKE UGWUAJI HEALTH CENTRE/BHCPF	ONYIA CHRISTIANA NGOZI	Okeke Chinyere Veronica	3	137,180

# Show chart
res$chart

Ezeagu

res <- get_oic_summary("EZEAGU")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			41	4,519,344
1	IWOLLO	AMALU HELEN	CELLINA NKECHINYERE IDOKO	6	676,741
2	MODEL PRIMARY HEALTH CENTRE	ODENIGBO GRACE	OKEKE MODESTA NGOZI	4	523,230
3	AGOBU UMUMBA HC	AGBO MAUREEN	OFFORDILE ROSELINE	3	517,000
4	OBINOFIA NDIUNO B HC	IKE BENEDETH	ONWUKWE FIDELIA GINIKANWA	3	506,673
5	AGBA UMANA HC	OLIBO VIRGINIA	AGBO MAUREEN	3	400,000
6	AKAMA OGHE	OKEKE MODESTA	ENEKWENCHI CAROLINE UZOMA	3	374,000
7	AWHA IMEZI HC	OFFORDILE ROSELINE	OZOEZE SCHOLASTICA EBERECHUKWU	3	310,000
8	UMANA NDIUNO HC	UME LETICIA	EZE GLORIA EBERECHUKWU	3	243,000
9	NEKE OGHE	ENEKWANCHI CAROLINE	NNABUCHI SUNDAY OGARA	4	241,800
10	OBELEAGU UMANA HC	NWONYE CECILIA	OKEKE NKECHI PRECIOUS	2	232,000
11	OGWOFIA HC	ALI GRACE	OHAGWU MARGARET NWADINOBI	3	217,400
12	UPATA EZEMA HC	OHAGWU MARGARET	OKONKWO CHRISTIANA NGOZIKA	1	165,000
13	IHUONYIA HC	OZOEJIKE OBIAGELI	NWONYE CECILIA ONYINYE	1	62,500
14	UMUMBA NDIUNO HC	EZE GLORIA	IKE BENEDETH IFEOMA	1	40,000
15	OKPOGHO HC	NWAOKIKE MAUREEN	MGBACHI NKIRUKA EUCHARIA	1	10,000

# Show chart
res$chart

Igbo-Etiti

res <- get_oic_summary("IGBO-ETITI")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			86	7,575,408
1	IKOLO HEALTH CENTRE	ODOH MARY UCHENWA	UGWU EMMANUEL UDEMEGBUNAM	6	813,750
2	OSHIGBO HEALTH CENTRE	NWANI FELICIA	AMADI JOSEPHINE CHINWEOGOM	7	722,455
3	OHEMUJE HEALTH CENTRE	OKECHUKWU KATE	ALAKU VICTORIA NNENNA	8	648,881
4	NUA HEALTH FACILITY AKU	DIDI CHYNTERE. I.	OKPE MARTINA OBIOMA	6	539,612
5	MGBOKO HEALTH CENTRE	ALAKU VICTORIA	OKECHUKWU KATE OBIAGELI	6	538,940
6	IJO HEALTH CENTRE	NZUTEIGBO MERCILINA	AGUBUZU UDENWA DORATHY	6	518,554
7	UWELLE UKEHE HEALTH CENTRE	UMUKWULU CORDELIA	NZUTEIGBO MERCILINA OYE	6	514,680
8	ENUGU STATE PHCDA-UMUNA BHCPF	NWAMBA MOSES	ODO EDINA CHINELO	6	496,022
9	AMABOKWU MODEL PRY. HEALTH CENTRE	OKPE MARTINA	DIDI CHINYERE ANNASTESIA	6	495,466
10	OZALLA HEALTH CENTRE	EZEORAH MARY	EZEORAH MARY NWANAGUM	6	495,400
11	AMANEFI HEALTH CENTRE UKEHE	NNADI FEDELIA	OGBU JOY AMOGE	6	489,395
12	IDOHA HEALTH CENTRE	OGBONNA ANTHONIA	ANI ANTHONIA CHINYERE	6	471,700
13	UMUOFIAGU HEALTH CENTRE	ANI ANTHONIA	OGBONNA ANTHONIA CHINASA	5	455,360
14	UMUNKO HEALTH CENTRE	UGWUELE GRACE	NWAMBA MOSES EZE	6	375,193

# Show chart
res$chart

Igbo-Eze North

res <- get_oic_summary("IGBO-EZE NORTH")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			96	12,078,098
1	OGRUTE HEALTH CENTRE	ASSUMTA OBETTA	JECINTA NWODO	6	1,398,000
2	AMACHALLA HEALTH CENTRE	PRICILIA EZE	EZENWALI VIOLET	7	1,173,000
3	UMUISHI HEALTH CENTRE	OCHENJE SARAH	ALACHI ESTHER	8	940,900
4	UGBAIKE HEALTH CENTRE	OKPE EVELYN	ALI JACINTA	7	879,000
5	OLIDO HEALTH CENTRE	ABUGU FIDELIA	AMEDO FIDELIA	5	870,900
6	UMUOGBO INYI HEALTH CENTRE	EZE GLORIA	EZE MICHEAL	7	869,000
7	ETTE HEALTH CENTRE	ESTHER ABUTU	SERAH OCHENJE	6	857,000
8	IGOGORO HEALTH CENTRE	URAMA AUGUSTINA	ADONU DORATHY	5	801,000
9	IJEKPE	ALACHI ESTHER	ABUTU ESTHER	6	685,800
10	UMUOGBO ULO HEALTH CENTRE	EZE ESTHER	OGBU JACINTA	5	679,678
11	UMUAGAMA HEALTH CENTRE	AGBO CALISTA	CHUKWUMA MARYTHERESA	6	602,100
12	UMUOPU HEALTH CENTRE	URAMA EBERE	AZEGBA ANTHONIA	6	599,760
13	AMUIFE HEALTH CENTRE	IDIKO JOSEPHINE	AGBO CALISTA	5	490,660
14	AJI HEALTH CENTRE	VICTORIA UGWU	OSHMI EBERE	5	485,000
15	IKPAMODO HEALTH CENTRE	ENWE CELINE	OBETTA ASSUMPTA	5	397,000
16	UMUIDA HEALTH CENTRE	AZEGBA ANTHONIA	ENWE EUCHERIA	2	169,300
17	UDA HEALTH CENTRE	ALI JACINTA	ABUGU FIDELIA	3	155,000
18	ONICHA ENUGU HEALTH CENTRE	AMEDU FIDELIA	OKPE EVELYN	2	25,000

# Show chart
res$chart

Igbo-Eze South

res <- get_oic_summary("IGBO-EZE SOUTH")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			61	5,657,029
1	ALOR AGU HEALTH CENTRE	UGWU LUCY	Omeje Roseline Uzoamaka	5	767,750
2	OVOKO ULO HEALTH CENTRE	UGWU CHRISTIANA	Ihenacho Anastecia C	6	670,750
3	OVOKO AJUONA HEALTH CENTRE	UGWUANYI ANGELA	Ugwu Angela Chinyereugo	7	649,700
4	ULUNYA HEALTH CENTRE	AYOGU VICTORIA C.	Ugwu Juliana Amuche	5	623,424
5	UHUNOWERRE HEALTH CENTRE	AGASHI JUSTINA	Asogwa Blessing Nkechi	6	574,180
6	NKALAGU OBUKPA HEALTH CENTRE	UGWU SUSAN OBINNA	Chizoba Blessing Eze	7	551,760
7	EBURUMIRI HEALTH CENTRE	EZE ANTHONIA	OMADA GILBERT CHUKWUMA	7	550,288
8	IHEAKPU ULO HEALTH CENTRE	UGWUANYI JACINTA N.	Ugwoke Augustina Onyejere	6	445,284
9	UNADU HEALTH CENTRE	AMEH CECILIA	Agashi Justina Chinweoke	6	421,893
10	IHEAKPU AGU HEALTH CENTRE	IHEANACHO ANASTASIA	Ayogu Victoria Chinyere	6	402,000

# Show chart
res$chart

Isi Uzo

res <- get_oic_summary("ISI UZO")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			15	1,902,500
1	IKEM HEALTH CENTER	AGBOEZE JULIANA	ICHEKU JULIANA NKECHI	6	643,500
2	UGWUAKPARATA HEALTH CENTER	ODO EUPHEMIA	MAKATA SCHOLASTICA UGOCHUKWU	5	559,000
3	UGWUADAKA HEALTH CENTER	OGBODO JACINTA	OGBU JACINTA	2	400,000
4	EBIA HEALTH CENTER	UGWUEZE MARTINA	URAMA ANGELA CHINYERE	2	300,000

# Show chart
res$chart

Nkanu East

res <- get_oic_summary("NKANU EAST")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			62	5,156,896
1	ORUKU BASIC	MBACHUKWU JACINTA	UBAGU CHARITY CHINYERE	9	974,000
2	ISIOGBO BHCPF	EDEH PATIENCE	ANIOBI EUNICE NNENNA	10	958,394
3	NKEREFI ENUOGU	ANIOBI EUNICE	EGBO JUSTINA EBERE	5	592,000
4	NARA HEALTH CENTRE	EKWE BRIDGET U.	OGBODO PATRICIA CHEKWUBE	6	484,168
5	MBULUOWO BHCPF	OKENWA GRACE	ONU ROSEMARY NWAKAEGO	8	463,200
6	AMAFOR UGBAWKA HEALTH CENTRE BHCPF	UZOMA PATIENCE NDIDI	EZE VICTORIA MARTHA	3	420,000
7	AMAGUNZE MODEL HEALTHCARE BHCPF	ANI NGOZI	NWANKWO CELESTINA OSINACHI	3	380,000
8	IHUOKPARA BHCPF	OKAFOR RITA N.	NNAMOKO ANAYO JULIET	4	300,000
9	UBAHU BHCPF	IGWURUBE NGOZI	OGBODO MONICA NWAKAEGO	8	252,000
10	NKEREFI HEALTH CENTRE	NWANKWO OSINACHI CELESTINA	OKAFOR RITA NGOZI	2	233,134
11	MBURUBU HEALTH CENTRE BHCPF	OGBODO PATRICIA	MBA MARY C	4	100,000

# Show chart
res$chart

Nkanu West

res <- get_oic_summary("NKANU WEST")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			31	3,201,110
1	AKEGBE UGWU HEALTH CENTRE/BHCPF	Ezea Beatrice	Agbonovo Jacinta Amuche	4	379,616
2	ENUGU STATE PHCDA-AMODU	ANIZOBA STELLA	Onovo Gloria Uche	2	369,940
3	OBINAGU UWANI AKPUGO/BHCPF	Egbo Joy Chinenye	Ogbodo Priscillia Nnenna	3	350,500
4	AMURRI HEALTH CENTRE/BHCPF	Ozoike Ann	Chima Cordrlia Nwanagu	3	337,800
5	NDIUNO UWANI HEALTH CENTRE/BHCPF	Agbonovo Jacinta Amuche	Egbo Joy Chinenye	3	293,114
6	ENUGU STATE PHCDA-AMANGWU BHCPF	OGBODO BEATRICE	Nwigwe Eucharia Nnenna	3	285,200
7	ENUGU STATE PHCDA-O EJI NDIUNO	Nnamani Peace Ngozi	Aninwonye Patience Chinenye	3	281,134
8	OZALLA HEALTH CENTRE/BHCPF	Aninwonye Patience Chinenye	Arum Oluchukwu Juliet	3	220,106
9	ENUGU STATE PHCDA-O EJI NDIAGUBHCP	Ede Christiana Ngozi	Ngene Charity Ijeoma	1	203,000
10	UMUEZE HEALTH CENTRE/BHCPF	Ogbodo Priscillia	Nnamani Peace Ngozi	2	194,700
11	OBE HEALTH CENTRE/BHCPF	Ngene Ijeoma	Agude Helen Chinonyelum	3	190,000
12	ENUGU STATE PHCDA-OBEAGHU-BHCPF	Ngoxi Chukwude	Ede Christiana Ngozi	1	96,000

# Show chart
res$chart

Nsukka

res <- get_oic_summary("NSUKKA")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			43	3,896,725
1	EHA NDIAGU HEALTH CENTRE	UGWUJA JACINTA	ossai Gloria Nwakaego	5	802,528
2	IBEKU OPI HEALTH CENTRE	OFIELU PATIENCE	OMEJA JACINTA	8	745,100
3	OZI EDEM HEALTH CENTRE	EZE EUCHARIA	ONAH CORDELIA	6	646,192
4	EDEM ANI HEALTH CENTRE	UGWUOKE ESTHER	Ajibo Anthonia Nkechi	5	491,000
5	NRU HEALTH CENTRE	ONYEKELU ANTHONIA	OZIOKO CHRISTOPHINE	7	456,041
6	EDE-OBALLA HEALTH CENTRE	ONAH ONYEDIKACHI	Ogene Grace Njideka	6	409,456
7	ISIENU HEALTH CENTRE BHCPF	EKOWO BENEDICTA	ONAH ONYEKACHI	6	346,408

# Show chart
res$chart

Oji River

res <- get_oic_summary("OJI RIVER")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			41	3,479,700
1	ENUGU STATE PHCDA-ELUGWU AKWU BHCPF	ONUIGWE NNAMDI DANIEL	ONYENA DEBORA NKIRUKA	2	415,000
2	UMUAGU INYI H/C BHCPF	ILO THERESA	NWOKOLO ETHEL TOCHI	3	402,148
3	UGWUOBA HEALTH CENTRE/BHCPF	CHITOR CATHERINE	ANOCHILI BLESSING NGOZIKA	1	350,000
4	BASIC HEALTH CENTRE	OGBODO GLORIA	ONYEKWERE CAROLINA ADAMSKA	2	304,700
5	ENUGU STATE PHCDA UMUORI BHCPF	ONYEHARA JANET	NNAMANI ONYINYE RUTH	3	300,772
6	ISIKWE HEALTH CENTRE/BHCPF	ILO OKECHUKWU	IKE GRACE	5	286,000
7	EGWU H/C-BHCPF	UMEH PROMISE	UDESIKE GLORIA UCHENNA	5	272,700
8	ENUGU STATE PHCDA-AMANKPUNATO	IKE GRACE	ILO OKWUCHUKWU	6	267,000
9	ENUGU STATE PHCDA-ALUM INYI BHCPF	AKAM CHRISTIANA	MADUKA UJU COLLINS	2	243,992
10	AGBADALA HEALTH CENTRE/BHCPF	OKORO ELIZABETH CHIGOZIE	UMEH PROMISE NNEKA	5	139,600
11	UMULOPU OBUNE H/C-BHCPF	ONYEYIRI MARTINA	ILOABUEKE VIVIAN C	2	112,788
12	ENUGU STATE PHCDA-OKWE CENTRAL BH	OKEKEZE EBERE	UGWUANYI NNEKA VIVIAN	1	110,000
13	UMUONWU HC	ONWEKWE PATRICIA	OBODO BENEDETH ONYINYE	1	100,000
14	ENUGU STATE PHCDA-AKPUGOEZE BHCPF	OFFOEGBUNAM APPOLONIA	ONUIGWE NNAMDI DANIEL	1	90,000
15	ENUGU STATE PHCDA-AGUABOSI BH	NCHEKWUBE JUSTINA	AKABUEZE CYNTHIA EBELE	1	70,000
16	AWLAW ETITI HEALTH CENTRE/BHCPF	OKEKE VINTUS	EJIMOFOR GLORIA CHIKA	1	15,000

# Show chart
res$chart

Udenu

res <- get_oic_summary("UDENU")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			44	7,858,027
1	ALGON COMP	UROKO PATRICAN	ODO EUPHMIA NKEMDILIM	5	1,156,687
2	IMILIKE UNO	OGBU EUNICE	OGBONNA THERESA CHIBOTA	6	1,062,400
3	OBOLLO EKE	OGBONNA BIBIAN NGOZI	ODO AUGUSTINA NNEDINSO	5	1,053,540
4	OBOLLO ETITI	EZE EUCHARICA	UGWU AUGUSTINA NGOZI	5	1,008,400
5	AMALLA EGAZI	MBA MARCILIAN	OGBU EUNICE CHINYERE	5	956,000
6	OBOLLOR AFFOR	ODO FIDELIA	EKWUEME FLORENCE N	6	900,000
7	MPHCC ORBA	ONYEBUEKE NKECHI	UGWUARUA PATRICIA NGOZI	4	832,000
8	OGBODU-ABA	IKE ROSELINE	BENJAMIN NGOZI GLORIA	5	476,000
9	UMUNDU	EKWUEME FLORENCE	EZE JACINTA N	3	413,000

# Show chart
res$chart

Udi

res <- get_oic_summary("UDI")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			36	5,949,925
1	NGWO UNO HC	OKONGWU ANN	IKEOHRA MAGDALENE	3	1,521,009
2	OKUNINO HC	ONYIA ESTHER	ANASTACIA VIRGINUS	4	640,000
3	UMUAGA HC	AGUMACHIE ANNASTECIA	NDIFE ANGELA	4	610,042
4	UMUABI HC	NDIFE ANGELA	ONYIA ESTHER CHINYERE	4	577,200
5	EZINZE HC	IGWE SCHOLASTICA N.	ONOH LILIAN	4	550,954
6	IKEDIMKPA HC	VIRGINIA ANNASTECIA OBIAGELI	OKOLO IFEOMA	4	524,600
7	NACHI HC	IKEORHA MAGDALENE	UZO LOVINA	4	523,260
8	UKANA HC	UKWUANI SCHOLASTICA	UGWU IFEOMA MARY	2	421,500
9	OBIOMA HC	UZOR LOVINA	ENEH OGOCHUKWU AUGUSTINA	3	266,800
10	0BINAGU HC	ENE SABINA	UKWU BENADINE NGOZI	3	256,240
11	OBINAGU HC	ENE SABINA	UKWU BENADINE NGOZI	1	58,320

# Show chart
res$chart

Uzo Uwani

res <- get_oic_summary("UZO UWANI")

# Show table
res$table 

S/N	PHC	OLD OIC	NEW OIC	Withdrawals_Count	Total_Amount
	TOTAL			45	3,144,041
1	ENUGU STATE PHCDA-UGWU UGBENE-BHCPF	EZEA MERCY	EKWUNIFE EVELYN	5	455,800
2	ONUEKE NIMBO HEALTH CENTRE	AKOR GLORIA	UTAZI CAROLINE	5	444,000
3	ENUGU STATE PHCDA-NKPOLOGU-BHCPF	OKAGU FLORENCE	ONOKWULU HYACINTH	4	415,800
4	ABBI BHCPF	ANIGBOGU CHINWE ESTHER	OGBOBE PATRICIA O.	5	393,604
5	OGURUGU HEALTH CENTRE	OKWUNWANNE FRANCISCA	ONWUKA MONICA EBERE	6	384,500
6	IGGA HEALTH CENTRE	OFODILE PATIENCE	OFODILE PATIENCE N.	5	322,000
7	ADANI HEALTH CENTER	OKPO VERONICA	EZE THERESA NKASIOBI	5	302,000
8	AKPUGO HEALTH CENTRE-SERVICES ACCOUNT	UGWUOKE CORDELIA	ONODAGU EUPHAMIA NNEKA	4	184,500
9	MPHC UGBENEAJIM HEALTH CENTRE/BHCPF	OGBOBE PATRICIA	ONUNZE EUCHARIA C.O	3	162,837
10	ENUGU STATE PHCDA-NROBO-BHCPF	UTAZI CAROLINE	OGBOBE BENEDETTE CHINYERE	3	79,000

# Show chart
res$chart

3. PHCs With Low Bank Balance (< ₦350,000)

low_balance <- balance %>%
  filter(BALANCE < 350000) %>% 
  arrange(LGA, desc(BALANCE))

low_balance %>%
  flextable() %>%
  autofit()

LGA	PHC	BALANCE
ANINRI	NENWE HC	194,324
ANINRI	AGBOECHARA HC	108,694
ANINRI	ODUMA BASIC HC	63,900
ANINRI	ODUMA ACHARA HC	235
AWGU	AGBOGUGU HC	290,410
AWGU	OBEAGU HC	230,909
AWGU	UGWUEME HC	81,874
ENUGU EAST	AMORJI HC	265,042
ENUGU EAST	UMUNWENE HC	235,795
ENUGU EAST	UGWUOMU HC	99,387
ENUGU NORTH	UGWU AARON HC	320,461
ENUGU NORTH	ARTISAN HC	317,919
ENUGU NORTH	CPS HC	307,076
ENUGU NORTH	UMUNEVO HC	303,670
ENUGU NORTH	ONUASATA HC	242,553
ENUGU SOUTH	OBEAGU HC	345,233
ENUGU SOUTH	EKE UGWUAJI HC	190,950
ENUGU SOUTH	SATA HEALTH POST	132,091
ENUGU SOUTH	OLOGO HEALTH POST	69,667
ENUGU SOUTH	NDIAGU AMECHI HC	50,019
EZEAGU	MGBAGBU-OWA HC	318,489
EZEAGU	OKPOGHO HC	292,773
EZEAGU	OGULOGU HC	218,216
EZEAGU	IWOLLO HC	65,483
IGBO EZE NORTH	UGBAIKE HC	336,381
IGBO EZE NORTH	ONICHA ENUGU HC	281,553
IGBO EZE NORTH	ETTE HC	139,087
IGBO EZE NORTH	IJEKPE HC	109,727
IGBO EZE NORTH	UMUISHI HC	76,966
IGBO EZE SOUTH	ITCHI AGU HC	340,823
IGBO EZE SOUTH	IBAGWA-AKA PHC	336,964
IGBO EZE SOUTH	ALOR AGU HC	188,539
ISI UZO	MBUAGUDENE HC	304,433
ISI UZO	EBIA HC	1,697
ISI UZO	UGWUAKPARATA HC	333
NKANU EAST	ISIOGBO HC	324,115
NKANU EAST	ENUOGU HC	291,863
NKANU EAST	NOMEH HC	226,144
NKANU EAST	AMUZAM HC	136,502
NKANU WEST	UMUEZE HC	344,704
OJI RIVER	ENUGWU INYI HC	303,768
OJI RIVER	AGBALENYI HC	302,071
OJI RIVER	UMULOPE OBUNE HC	300,947
OJI RIVER	AWLAW ETITI HC	288,475
UDENU	IBAGWA EZIMO HC	301,784
UDI	ABOR HC	309,361
UDI	UMUABI HC	293,546
UDI	AMOKWE HC	209,112
UZO UWANI	UGWU UGBENE HC	344,181

4. Suggested Analyses

a. Monthly Withdrawal Trend

finance %>%
  mutate(Month = floor_date(DATE, "month")) %>%
  group_by(Month) %>%
  summarise(Total = sum(AMOUNT, na.rm = TRUE)) %>%
  ggplot(aes(x = Month, y = Total)) +
  geom_line(color = "steelblue", size = 1.2) +
  geom_point(color = "darkred") +
  labs(title = "Total Monthly Withdrawals", x = "Month", y = "Amount (₦)") +
  theme_minimal()

b. Average Withdrawals by LGA

finance %>%
  group_by(LGA) %>%
  summarise(Total_Amount = sum(AMOUNT, na.rm = TRUE)) %>%
  ggplot(aes(x = reorder(LGA, Total_Amount), y = Total_Amount)) +
  geom_col(fill = "skyblue") +
  geom_text(aes(y = Total_Amount, label = scales::comma(Total_Amount)), 
              vjust = 0.5, size = 3.2, color = "black") +
  coord_flip() +
  labs(title = "Total Withdrawal by LGA", x = "LGA", y = "Total Amount Withdrawn ₦") +
  theme_minimal()

b. Total Withdrawals by LGA

finance %>%
  group_by(LGA) %>%
  summarise(Average_Withdrawal = mean(AMOUNT, na.rm = TRUE)) %>%
  ggplot(aes(x = reorder(LGA, Average_Withdrawal), y = Average_Withdrawal)) +
  geom_col(fill = "skyblue") +
  geom_text(aes(y = Average_Withdrawal, label = scales::comma(Average_Withdrawal)), 
            vjust = 0.5, size = 3.2, color = "black") +
  coord_flip() +
  labs(title = "Average Withdrawal by LGA", x = "LGA", y = "Average ₦") +
  theme_minimal()