What a cool idea! I like GeoProjection->"WinkelTripel" at least for the world maps, so here is this version. I also wonder if the average color of satellite images depend on the time of the year when they are taken.
GeoProjection->"WinkelTripel"
Thanks for your interesting post. Here is the closeup on Japan.
GeoGraphics[{GeoStyling[Once[countryColor[#]]], #["Polygon"]}&/@ EntityList[Entity["Country","Japan"]["AdministrativeDivisions"]], GeoBackground -> None]
-- you have earned Featured Contributor Badge Your exceptional post has been selected for our editorial column Staff Picks http://wolfr.am/StaffPicks and Your Profile is now distinguished by a Featured Contributor Badge and is displayed on the Featured Contributor Board. Thank you!
