File talk:BlankMap-World-v5.png
coordinates for automated bucket-filling: the coordinates of the island states of the Pacific should be checked for accuracy (please remove this note if you did).
Afghanistan 820,210 Albania 639,179 Algeria 570,235 Andorra 567,171 Angola 630,420 Anguilla 303,285 Antigua and Barbuda 309,285 Argentina 310,510 Armenia 737,184 Australia 1100,480 Austria 618,148 Azerbaijan 745,180 Bahamas 242,251 Bahrain 764,245 Bangladesh 928,256 Barbados 318,303 Belarus 665,125 Belgium 582,136 Belize 196,282 Benin 569,316 Bhutan 924,240 Bolivia 290,440 Bosnia and Herzegovina 630,164 Botswana 655,465 Brazil 340,400 Brunei 1037,344 Bulgaria 655,170 Burkina Faso 550,305 Burundi 683,380 Cambodia 990,305 Cameroon 610,340 Canada 200,100 Cape Verde 468,295 Central African Republic 650,330 Chad 635,290 Chile 280,470 China 1000,200 Taiwan, 1052,257 Colombia 258,346 Comoros 740,422 Congo (Brazzaville) 625,365 Congo (Kinshasa) 660,380 Costa Rica 210,320 Côte d'Ivoire 535,330 Croatia 622,159 Cuba 240,267 Cyprus 692,206 Czech Republic 619,139 Denmark 599,114 Djibouti 736,312 Dominica 310,294 Dominican Republic 271,278 Ecuador 233,368 Egypt 675,240 El Salvador 194,301 Equatorial Guinea 604,357 Eritrea 717,292 Estonia 654,102 Ethiopia 720,325 Fiji 1290,446 Finland 655,80 France 575,155 French Guiana 338,346 Gabon 605,366 The Gambia 497,302 Georgia 730,175 Germany 600,135 Ghana 550,330 Greece 646,184 Greenland 450,40 Grenada 303,311 Guatemala 188,295 Guinea 515,315 Guinea-Bissau 498,309 Guyana 313,340 Haiti 264,277 Honduras 202,298 Hong Kong 1024,263 Hungary 635,150 Iceland 510,75 India 880,260 Indonesia 1035,370 Iran 775,215 Iraq 735,215 Ireland 535,125 Israel 699,224 Italy 611,169 Jamaica 241,282 Japan 1105,200 Jordan 708,223 Kazakhstan 800,150 Kenya 715,360 Kiribati 1284,359 North Korea 1050,180 South Korea 1060,200 Kuwait 750,230 Kyrgyzstan 850,175 Laos 980,275 Latvia 653,109 Lebanon 704,211 Lesotho 673,498 Liberia 520,335 Libya 630,240 Liechtenstein 602,151 Lithuania 650,115 Luxembourg 586,141 Macau 1018,265 Republic of Macedonia 644,176 Madagascar 750,450 Malawi 700,425 Malaysia 984,346 Maldives 860,342 Mali 550,280 Malta 617,203 Marshall Islands 1274,331 Mauritania 510,280 Mauritius 796,456 Mexico 150,260 Micronesia 1215,331 Moldova 670,152 Monaco 591,166 Mongolia 950,160 Morocco 535,220 Mozambique 715,430 Myanmar 955,270 Namibia 630,470 Nauru 1254,365 Nepal 900,235 Netherlands 585,130 New Caledonia (F) 1232,459 New Zealand 1240,540 Nicaragua 208,308 Niger 600,290 Nigeria 590,320 Niue (NZ) 1315,457 Norway 600,95 Oman 795,265 Pakistan 840,230 Palau 1118,331 Palestine 702,223 Panama 222,326 Papua New Guinea 1160,390 Paraguay 320,470 Peru 240,400 Philippines 1060,290 Poland 635,130 Portugal 530,190 Puerto Rico 285,281 Qatar 769,250 Romania 655,160 Russia 900,100 Rwanda 684,373 Saint Kitts and Nevis 310,285 Saint Lucia 309,301 Saint Vincent and the Grenadines 308,307 Samoa 1334,428 San Marino 606,164 São Tomé and Príncipe 591,359 Saudi Arabia 730,250 Senegal 500,295 Serbia and Montenegro 640,165 Seychelles 793,387 Sierra Leone 510,325 Singapore 292,357 Slovakia 635,144 Slovenia 618,156 Solomon Islands 1217,403 Somalia 760,320 South Africa 650,500 Spain 550,190 Sri Lanka 895,330 Sudan 680,300 Suriname 325,346 Swaziland 688,484 Sweden 615,100 Switzerland 593,153 Syria 710,205 Tajikistan 830,190 Tanzania 700,390 Thailand 977,294 East Timor 1081,404 Togo 563,325 Tonga 1315,457 Trinidad and Tobago 304,317 Tunisia 600,210 Turkey 700,190 Turkmenistan 790,185 Tuvalu 1302,409 Uganda 695,360 Ukraine 680,140 United Arab Emirates 781,256 United Kingdom 560,130 USA 170,190 Uruguay 340,510 Uzbekistan 800,170 Vanuatu 1250,438 Vatican 611,175 Venezuela 290,330 Vietnam 988,266 Western Sahara 505,255 Yemen 755,295 Zambia 666,425 Zimbabwe 680,450
GIMP script
[edit]first, you need a clean tab-separated list of the data you want to visualize. Do something like
cat buddhism_per_country.txt | perl -e 'while ($i=<>){if($i=~/ in ([^\t]+).+\t([\.\,\d]+)\%/){print "$1\t$2\n";}}' > buddh.txt
assuming that buddhism_per_country.txt contained the copy-pasted text of en:Buddhism by country, your buddh.txt now has the clean list.
The follwing is a simple perlscript to output the gimp script needed. You can pipe its output into
gimp -b -
to generate the map.
You need World-BW.png (the blank map, remember to convert it to RGB), the fu script writes the painted map to painted.png
#!/usr/bin/perl @files=('hindu.txt','buddh.txt'); #these are the names of the files with the tab-separated data open A, "country_coor.txt"; #this is the filename of the coordinate list pasted above while($in=<A>){if($in=~/^(.+) (\d+),(\d+)/){$coor{$1}="$2 $3";}} close A; print " (define img (car (file-png-load 0 \"World-BW.png\" \"World-BW.png\")))\n (define layer (car (gimp-image-get-active-layer img)))\n"; foreach $file (0..$#files){ open I,"$files[$file]"; while($i=<I>){ if($i=~/^([^\t]+)\t([\d\.\,]+)(\t([\d\.\,]+)|)/){ $c=$1; $p=$2; $p2=$4;unless($p2){$p2=$p;} $c=~s/ +$//; #here are some replacements to recognize variants of country names; I just added them as needed, this could of course be generalized into a decent subroutine. $c at the end needs to equal the country label in the coordinate list. if($c=~/Republic of China/){$c="China"} if($c=~/West Bank and Gaza/){$c="Palestine"} if($c=~/(FYR Mac|FYRoM)/){$c="Republic of Macedonia";} $c=~s/the ((Phili|Nether|United Arab).*)/$1/i; if($c=~/Korea, South/){$c="South Korea"}; if($c=~/United States/){$c="USA"}; if($c=~/Puerto Rico/){$c="Puerto Rico"}; if($c=~/Vatican/){$c="Vatican";} if($c=~/United Kingdom/){$c="United Kingdom";} if($c=~/Argent/){$c="Argentina";} if($coor{$c}){ $flag{$c}=1; #remembers if any data was found for country $c $color[$file]{$c}=int($p*2.55); if($p2){$color[$file+1]{$c}=int($p2*2.55);} } }} close I; } foreach $k (keys %coor){ if($flag{$k}){ #this is just an example colour scheme, painting the data from the first file green and that from the second file red. you need to fiddle with the formula for other colour schemes. $col=(255-$color[0]{$k})." ".(255-$color[1]{$k})." ".(255-$color[0]{$k}-$color[1]{$k}); print" \;$k (gimp-context-set-foreground '($col))\n (gimp-edit-bucket-fill layer FG-BUCKET-FILL NORMAL-MODE 100 0 FALSE $coor{$k})\n"; } } print"\n (file-png-save-defaults 1 img layer \"painted.png\" \"painted.png\") ";
This will output something like
(define img (car (file-png-load 0 "World-BW.png" "World-BW.png"))) (define layer (car (gimp-image-get-active-layer img))) ;Sweden (gimp-context-set-foreground '(185 177 108)) (gimp-edit-bucket-fill layer FG-BUCKET-FILL NORMAL-MODE 100 0 FALSE 615 100) [etc...] (file-png-save-defaults 1 img layer "painted.png" "painted.png")
Channel Islands
[edit]The Channel Islands, I believe, are not part of the E.U. Should they be shown as "dots"? Jade Knight 01:13, 10 August 2006 (UTC)
- I dont think so since the dots are only meant to show sovereign countries --Astrokey44 07:01, 17 August 2006 (UTC)
- He's right, they're not part of the EU and nor is the Isle of Man. Neither the Isle of Man nor Channel Islands are fully sovereign countries but they should be includes in this world map because it is designed to be used for geopolitical maps and articles and in those cases it's obviously necessary to show differences - for example, the Isle of Man is frequently included in lists of GDP, GDP per capita, Sovereign Bond ratings (AAA, by the way) and countless other statistics which differ to the the UK's statistics. The same usually applies for the Falkland Islands which are also not part of the UK but, despite their location off the coast of South America, are more European that the CI or IOM because their citizens are automatically 'European Union citizens' whereas in the Channel Islands and Isle of Man only some citizens are citizens of the EU.--109.113.213.46 19:42, 13 August 2011 (UTC)
important
[edit]do not change image size, or the coordinates above will not work. Dbachmann 14:21, 10 October 2006 (UTC)
Falkland - Malvinas islands
[edit]The map need to show the Falkland islands, that are a not too small part of the world, is so big like the fireland island, or almost.--Pruxo (talk) 22:35, 5 November 2009 (UTC)