region = "Kigezi"Kigezi Region
shade_region(region, names)
Kigezi Region includes six districts.
sort(unique(loc_table[region_name==region]$district_name)[-1]) -> names
names[1] "Kabale District"    "Kanungu District"   "Kisoro District"   
[4] "Rubanda District"   "Rukiga District"    "Rukungiri District"label_region(region, names, xshift, yshift)