region = "Bukedi"Bukedi Region
shade_region(region, names)
Bukedi Region includes seven districts.
sort(unique(loc_table[region_name==region]$district_name)[-1]) -> names
names[1] "Budaka District"   "Busia District"    "Butaleja District"
[4] "Butebo District"   "Kibuku District"   "Pallisa District" 
[7] "Tororo District"  label_region(region, names, xshift, yshift)