I wrote two prior posts with statistical information about Cuba
In one I computed the average salary to be equal to 233.00 dollars approximately and in the other I show a map of with all the countries who’s GDP per capita are less than Cuba’s GDP per capita.
Since the actual average pay for Cubans is 233.00 dollars and since that should equate to the GDP per capita I wanted to know what countries have a GDP per capita of less than 233.00 dollars.
Here is the answer I get from Mathematica
Select[CountryData[], CountryData[#, "GDPPerCapita"] < 233 &]
{“Afghanistan”, “Burundi”, “DemocraticRepublicCongo”, “Ethiopia”,
“GuineaBissau”, “Liberia”, “Malawi”, “Myanmar”, “Niger”,
“SierraLeone”, “Zimbabwe”}
and here is a map showing in color the countries whos GDP per capita is less than Cuba’s average salary!
