GeoRegionValuePlot[EntityList[]->"Population"]