Fix an issue where referring to clusterid by length of a list could fail if...

Fix an issue where referring to clusterid by length of a list could fail if clusterid is padded with zeros.

01_INVENTORY/INVENTORY_04_display_summary_demographics.R

@@ -197,6 +197,7 @@ for (country in names(gps_data_range)) {
                                                                         "top"    = gps_data_range[[country]][[clusterid]]$lat_max + GPS_LAT_OFFSET), 
                                                            source   = MAP_PROVIDER, 
                                                            maptype  = MAP_TYPE)
+    names(gps_map_backgrounds[[country]])[clusterid] <- gps_data_range[[country]][[clusterid]]$clusterid
   }
 }