30:T579,viewof flag = { var w = window.innerWidth-25; var h = (window.innerWidth-25)*3/5; var c = DOM.context2d(w, h); var maxFootprint = data[0].Footprint; var maxEarthsRequired = maxFootprint * numberOfPeople / totalHectares; var countryRatio = (data.length-countryIndex+1)/data.length; var morePlanets = function () { for (var i = 1; i <= Math.ceil(alternateEarths); i++) { c.beginPath(); c.fillStyle = d3.interpolate("#62C42D","#000000")(countryRatio); c.arc(w/2 + h/4 * Math.cos(2*Math.PI/Math.ceil(alternateEarths)*i), h/2 + h/4 * Math.sin(2*Math.PI/Math.ceil(alternateEarths)*i), h/(6+Math.ceil(alternateEarths)), 0, 2 * Math.PI); c.fill(); } } if (alternateEarths < 1) { c.fillStyle = d3.interpolate("#dbdbdb", "#dbdbdb")(alternateEarths); c.fillRect(0, 0, w, h); c.beginPath(); c.fillStyle = "#8FB1F2"; c.arc(w/2, h/2, h/3, 0, 2 * Math.PI); c.fill(); c.beginPath(); c.fillStyle = "#2D6ED6"; c.arc(w/2, h/2, h/3*0.9, 0, 2 * Math.PI); c.fill(); c.beginPath(); c.fillStyle = "#62C42D"; c.arc(w/2, h/2, h/3*0.9*(alternateEarths), 0, 2 * Math.PI); c.fill(); } else { c.fillStyle = d3.interpolate("#dbdbdb", "red")((alternateEarths-1)/(numberOfEarthsRequired-1)); c.fillRect(0, 0, w, h); morePlanets(); } yield c.canvas; }31:Td72,data = d3.csvParse(`Rank,Country,Footprint 1,Luxembourg,15.82 2,Aruba,11.88 3,Qatar,10.8 4,Australia,9.31 5,United States,8.22 6,Canada,8.17 7,Kuwait,8.13 8,Singapore,7.97 9,United Kingdom,7.93 10,Trinidad and Tobago,7.92 11,Montserrat,7.78 12,Oman,7.52 13,Bahrain,7.49 14,Belgium,7.44 15,Sweden,7.25 16,Estonia,6.86 17,Bahamas,6.84 18,Latvia,6.29 19,Israel,6.22 20,Mongolia,6.08 21,Austria,6.06 22,Taiwan,5.93 23,Finland,5.87 24,Lithuania,5.83 25,Slovenia,5.81 26,Switzerland,5.79 27,Bermuda,5.77 28,South Korea,5.69 29,Russia,5.69 30,Cayman Islands,5.65 31,Saudi Arabia,5.61 32,New Zealand,5.6 33,Ireland,5.57 34,Kazakhstan,5.55 35,Denmark,5.51 36,Turkmenistan,5.47 37,Antigua and Barbuda,5.38 38,Germany,5.3 39,Netherlands,5.28 40,Czech Republic,5.19 41,France,5.14 42,Belarus,5.09 43,Japan,5.02 44,Norway,4.98 45,Saint Kitts and Nevis,4.94 46,United Arab Emirates,4.94 47,Bhutan,4.84 48,French Polynesia,4.73 49,Italy,4.61 50,Barbados,4.48 51,Poland,4.44 52,Greece,4.38 53,Chile,4.36 54,Suriname,4.25 55,Cyprus,4.21 56,Paraguay,4.16 57,Brunei,4.06 58,Slovakia,4.06 59,Equatorial Guinea,3.97 60,Croatia,3.92 61,Portugal,3.88 62,Lebanon,3.84 63,Botswana,3.83 64,Montenegro,3.78 65,Malaysia,3.71 66,Libya,3.69 67,Spain,3.67 68,Réunion,3.65 69,New Caledonia,3.58 70,Venezuela,3.57 71,Mauritius,3.46 72,China,3.38 73,Turkey,3.33 74,Bulgaria,3.32 75,South Africa,3.31 76,Macedonia,3.26 77,Guadeloupe,3.23 78,Argentina,3.14 79,Bosnia and Herzegovina,3.12 80,Brazil,3.11 81,Saint Vincent and the Grenadines,3.11 82,Guyana,3.07 83,Grenada,2.98 84,Bolivia,2.96 85,Nauru,2.94 86,Hungary,2.92 87,Uruguay,2.91 88,Fiji,2.9 89,Mexico,2.89 90,British Virgin Islands,2.86 91,Costa Rica,2.84 92,Ukraine,2.84 93,Iran,2.79 94,Panama,2.79 95,Samoa,2.77 96,Romania,2.71 97,Serbia,2.7 98,Tonga,2.7 99,Thailand,2.66 100,Dominica,2.57 101,Mauritania,2.54 102,Cape Verde,2.52 103,Namibia,2.48 104,Saint Lucia,2.45 105,French Guiana,2.34 106,Tunisia,2.34 107,Uzbekistan,2.32 108,Azerbaijan,2.31 109,Peru,2.28 110,Armenia,2.23 111,Albania,2.21 112,Djibouti,2.19 113,Ecuador,2.17 114,Egypt,2.15 115,Algeria,2.12 116,Jordan,2.1 117,Martinique,2.08 118,El Salvador,2.07 119,Wallis and Futuna,2.07 120,Gabon,2.02 121,Swaziland,2.01 122,Ghana,1.97 123,Cuba,1.95 124,Kyrgyzstan,1.91 125,Papua New Guinea,1.91 126,Guatemala,1.89 127,Jamaica,1.89 128,Iraq,1.88 129,Colombia,1.87 130,Moldova,1.78 131,Honduras,1.68 132,Morocco,1.68 133,Lesotho,1.66 134,Vietnam,1.65 135,Georgia,1.58 136,Indonesia,1.58 137,Niger,1.56 138,Dominican Republic,1.53 139,Guinea-Bissau,1.53 140,Mali,1.53 141,Syria,1.51 142,Sao Tome and Principe,1.49 143,Chad,1.46 144,Myanmar,1.43 145,Benin,1.41 146,Guinea,1.41 147,Nicaragua,1.39 148,Zimbabwe,1.37 149,Sri Lanka,1.32 150,Tanzania,1.32 151,Congo,1.29 152,Solomon Islands,1.29 153,Côte d'Ivoire,1.27 154,Central African Republic,1.24 155,Sierra Leone,1.24 156,Somalia,1.24 157,Uganda,1.24 158,Laos,1.22 159,Burkina Faso,1.21 160,Cambodia,1.21 161,Liberia,1.21 162,Senegal,1.21 163,Cameroon,1.17 164,North Korea,1.17 165,India,1.16 166,Nigeria,1.16 167,Togo,1.13 168,Philippines,1.1 169,Comoros,1.03 170,Gambia,1.03 171,Kenya,1.03 172,Yemen,1.03 173,Ethiopia,1.02 174,Madagascar,0.99 175,Zambia,0.99 176,Nepal,0.98 177,Angola,0.93 178,Tajikistan,0.91 179,Mozambique,0.87 180,Rwanda,0.87 181,Congo,0.82 182,Malawi,0.81 183,Burundi,0.8 184,Afghanistan,0.79 185,Pakistan,0.79 186,Bangladesh,0.72 187,Haiti,0.61 188,Timor-Leste,0.48 189,Eritrea,0.49`)32:[{"id":"ec6fae289acac3824029d797cd6c1844b1980466235b498754799b79646982d3ce20d3fa9bb2405216a68b0698c70e9a38d6971e4f3a3caaf814674b6cb5c5fe","href":"https://static.observableusercontent.com/files/ec6fae289acac3824029d797cd6c1844b1980466235b498754799b79646982d3ce20d3fa9bb2405216a68b0698c70e9a38d6971e4f3a3caaf814674b6cb5c5fe","name":"GDP Data@4.csv","type":"text/csv","lastModified":1656908098648.776,"size":241944}] 2e:{"title":"New Kenya","cells":[{"id":0,"value":"md`\n# New ${alternateCountry}\n\n*\"For every person in the world to reach present US levels of consumption with existing technology would require four more planet Earths.\"*
— E. O. Wilson, ** *The Future of Life* **, 2003\n\nIn 2018, the number was closer to ${numberWords[Math.ceil(numberOfEarthsRequired)]} Earths.\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":34,"value":"md`\nBy contrast, if everyone lived like an average person from ${alternateCountry}, ${Math.ceil(alternateEarths) > 1 ? \"\" : \"only\"} ${numberWords[Math.ceil(alternateEarths)]} Earth${Math.ceil(alternateEarths) > 1 ? \"s\" : \"\"} would be required.\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":374,"value":"md`\nAs climate change and environmental degradation continue, people will need new adaptation strategies to deal with changing realities. One approach is to trust the market to develop new technologies, using economic pressure to drive necessary social changes. Another approach is to enact personal change, reducing one's resource usage, in hope that it ripples mimetically through larger cultural systems.\n\n**New ${alternateCountry}** *is a micronation for people who live within the same ecological footprint as an average person from ${alternateCountry}. We alter our habits to match this other reality, studying their society and culture.*\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":413,"value":"md`\n*Our way of life requires ${Math.ceil(alternateEarths) > 1 ? \"\" : \"only\"} ${numberWords[Math.ceil(alternateEarths)]} planet${Math.ceil(alternateEarths) > 1 ? \"s\" : \"\"}.*\n\n*${gdp ? \"We live on **USD$\"+gdpPerDay*7+\" a week**.\" : \"\"} ${Math.ceil(alternateEarths) > 1 ? \"We will have to colonize space if everyone lives like we do.\" : \"\"} This is our flag.*\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":120,"value":"$30","pinned":false,"hidden":false,"mode":"ojs"},{"id":864,"value":"Try another country:","pinned":false,"hidden":false,"mode":"html"},{"id":219,"value":"viewof countryIndex = {\n // Copy country data\n var countries = data.slice(0);\n // Make an alphabetical version\n countries.sort(function(a, b) {\n var textA = a.Country.toUpperCase();\n var textB = b.Country.toUpperCase();\n return (textA < textB) ? -1 : (textA > textB) ? 1 : 0;\n });\n const div = html`\n
\n \n `;\n const range = div.querySelector(\"[type=range]\");\n const select = div.querySelector(\"select\");\n div.value = range.value = select.value = defaultCountryIndex;\n range.addEventListener(\"input\", () => select.value = div.value = range.valueAsNumber);\n select.addEventListener(\"input\", () => range.value = div.value = parseInt(select.value));\n return div;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":853,"value":"md`---\n## Calculations\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":25,"value":"numberOfPeople = 7.55 * Math.pow(10, 9) // Number of people on earth","pinned":true,"hidden":false,"mode":"ojs"},{"id":115,"value":"totalHectares = 1.22 * Math.pow(10, 10) // Global hectares of production and waste assimilation","pinned":true,"hidden":false,"mode":"ojs"},{"id":27,"value":"usaFootprint = 8.37 // USA ecological footprint in global hectares / person","pinned":true,"hidden":false,"mode":"ojs"},{"id":31,"value":"// Number of Earths required to sustain everyone living at US standard of living\nnumberOfEarthsRequired = parseFloat((usaFootprint * numberOfPeople / totalHectares).toFixed(2))","pinned":true,"hidden":false,"mode":"ojs"},{"id":99,"value":"md`---\n\n## Sources\n\n- Global Footprint Network\n- Global hectare, Wikipedia\n- List of Countries by Ecological Footprint, Wikipedia\n- GDP Per Capita, Worldbank\n`","pinned":false,"hidden":false,"mode":"ojs"},{"id":386,"value":"md`---\n\n## Appendix`","pinned":false,"hidden":false,"mode":"ojs"},{"id":210,"value":"$31","pinned":false,"hidden":false,"mode":"ojs"},{"id":926,"value":"gdpData = {\n var obj = {}\n var csv = FileAttachment(\"GDP Data@4.csv\").csv({typed: true}).then(data => {\n data.forEach(row => {\n obj[row[\"Country Name\"]] = row\n })\n })\n return obj\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":925,"value":"gdpMaxYear = 2021","pinned":false,"hidden":false,"mode":"ojs"},{"id":924,"value":"gdpMinYear = 1960","pinned":false,"hidden":false,"mode":"ojs"},{"id":923,"value":"gdp = gdpData[alternateCountry] ? Math.round(gdpData[alternateCountry][getGDPYear(alternateCountry)]) : null","pinned":false,"hidden":false,"mode":"ojs"},{"id":922,"value":"gdpPerDay = Math.round(gdp/365)","pinned":false,"hidden":false,"mode":"ojs"},{"id":268,"value":"numberWords = [\"zero\",\"one\",\"two\",\"three\",\"four\",\"five\",\"six\",\"seven\",\"eight\",\"nine\",\"ten\"]","pinned":false,"hidden":false,"mode":"ojs"},{"id":404,"value":"alternateFootprint = parseFloat(data[countryIndex-1].Footprint) // In global hectares / person","pinned":false,"hidden":false,"mode":"ojs"},{"id":407,"value":"// Number of Earths required to sustain everyone at a different standard of living\nalternateEarths = alternateFootprint * numberOfPeople / totalHectares","pinned":false,"hidden":false,"mode":"ojs"},{"id":410,"value":"alternateCountry = {\n return data[countryIndex-1].Country;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":562,"value":"seedrandom = {\n var seed = 1;\n var sr = function random(newseed) {\n var x = Math.sin(newseed ? newseed : seed++) * 10000;\n return x - Math.floor(x);\n }\n return sr;\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":624,"value":"defaultCountryIndex = 166","pinned":false,"hidden":false,"mode":"ojs"},{"id":741,"value":"function serializeCanvas (canvas) {\n return canvas.toDataURL(\"image/png\")\n // return new Blob([canvas.toDataURL(\"image/png\")], {type: \"image/png\"});\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":921,"value":"function getGDPYear(countryName) {\n for (var i = gdpMaxYear; i--; i >= gdpMinYear) {\n if (gdpData[countryName][i]) {\n return i\n }\n }\n}","pinned":false,"hidden":false,"mode":"ojs"}],"files":"$W32","stdlib":"1","titling":"auto"}