region = "Kampala"
shade_region(region, names)
Kampala Region includes Kampala District.
sort(unique(loc_table[region_name==region]$district_name)[-1])
[1] "Kampala District"