https://stockhub.co/index.php?action=history&feed=atom&title=Module%3APop_density Module:Pop density - Revision history 2026-05-24T12:48:55Z Revision history for this page on the wiki MediaWiki 1.43.5 https://stockhub.co/index.php?title=Module:Pop_density&diff=144374&oldid=prev imported>Frietjes: fix double sort key 2019-04-28T13:31:39Z <p>fix double sort key</p> <p><b>New page</b></p><div>--<br /> -- This module implements {{Pop density}}<br /> --<br /> local p = {}<br /> local math_module = require( &quot;Module:Math&quot; )<br /> local precision = math_module._precision<br /> local sortkey = require( &quot;Module:Sortkey&quot; )<br /> <br /> local function rnd(num, digits)<br /> -- This function implements {{rnd}}<br /> return math_module._precision_format(tostring(num), tostring(digits))<br /> end<br /> local unitnames = {<br /> [&quot;km²&quot;] = &quot;km2&quot;,<br /> [&quot;sqkm&quot;] = &quot;km2&quot;,<br /> [&quot;km2&quot;] = &quot;km2&quot;,<br /> [&quot;mi2&quot;] = &quot;sqmi&quot;,<br /> [&quot;sqmi&quot;] = &quot;sqmi&quot;,<br /> [&quot;acres&quot;] = &quot;acre&quot;,<br /> [&quot;acre&quot;] = &quot;acre&quot;,<br /> [&quot;ha&quot;] = &quot;ha&quot;,<br /> [&quot;dunam&quot;] = &quot;dunam&quot;,<br /> [&quot;m²&quot;] = &quot;m2&quot;,<br /> [&quot;sqm&quot;] = &quot;m2&quot;,<br /> [&quot;m2&quot;] = &quot;m2&quot;<br /> }<br /> local unitmult = {<br /> [&quot;km2&quot;] = 1000000,<br /> [&quot;sqmi&quot;] = 2589988.110336,<br /> [&quot;acre&quot;] = 4046.8564224,<br /> [&quot;ha&quot;] = 10000,<br /> [&quot;dunam&quot;] = 1000,<br /> [&quot;m2&quot;] = 1<br /> }<br /> local unitstr = {<br /> [&quot;km2&quot;] = &#039;km&lt;sup&gt;2&lt;/sup&gt;&#039;,<br /> [&quot;sqmi&quot;] = &#039;sq&amp;nbsp;mi&#039;,<br /> [&quot;acre&quot;] = &#039;acre&#039;,<br /> [&quot;ha&quot;] = &#039;ha&#039;,<br /> [&quot;dunam&quot;] = &#039;dunam&#039;,<br /> [&quot;m2&quot;] = &#039;m&lt;sup&gt;2&lt;/sup&gt;&#039;<br /> }<br /> <br /> local function popdensity(pop, area1, areaunit1, areaunit2, prec, disp, flip)<br /> local dens1, dens1sort, prec1<br /> local dens2, dens2sort, prec2<br /> local str1, str2 = &#039;&#039;, &#039;&#039;<br /> local uniterror = &#039;&lt;sup&gt;[[Template:Pop density|?Unknown unit?]]&lt;/sup&gt;[[Category:Pop density using unsupported units]]&#039;<br /> <br /> if(pop ~= &#039;&#039; and area1 ~= &#039;&#039;) then<br /> -- pop and area are defined<br /> local popnum = tonumber(pop)<br /> if not popnum then<br /> error(string.format(&#039;Unable to convert population &quot;%s&quot; to a number&#039;, pop), 2)<br /> end<br /> local area1num = tonumber(area1)<br /> if not area1num then<br /> error(string.format(&#039;Unable to convert area &quot;%s&quot; to a number&#039;, area1), 2)<br /> end<br /> local dens1num = popnum/area1num<br /> <br /> local unit1 = unitnames[areaunit1] or nil<br /> local unit2 = unitnames[areaunit2] or nil<br /> <br /> prec1 = (prec ~= &#039;&#039;) and tonumber(prec) <br /> or (1+math.log10(2*area1/(1/10^precision(pop)+pop/area1/10^precision(area1))))<br /> dens1 = rnd(dens1num, math.floor(prec1 + 0.5))<br /> dens1sort = &#039;&lt;span style=&quot;display:none&quot; data-sort-value=&quot;&#039;<br /> .. sortkey._sortKeyForNumber(dens1num) .. &#039;♠&quot;&gt;&lt;/span&gt;&#039;<br /> if (unit1) then<br /> str1 = &#039;/&#039; .. unitstr[unit1]<br /> if(unit2) then<br /> -- convert<br /> local mult = unitmult[unit2]/unitmult[unit1]<br /> prec2 = prec1 - math.log10(mult)<br /> dens2 = rnd(dens1num*mult, math.floor(prec2 + 0.5))<br /> dens2sort = &#039;&lt;span style=&quot;display:none&quot; data-sort-value=&quot;&#039;<br /> .. sortkey._sortKeyForNumber(dens1num*mult) .. &#039;♠&quot;&gt;&lt;/span&gt;&#039;<br /> str2 = &#039;/&#039; .. unitstr[unit2]<br /> elseif(areaunit2 ~= &#039;&#039;) then<br /> if( disp ~= &#039;num&#039; ) then<br /> dens2 = &#039;?&#039;<br /> else<br /> dens2 = &#039;?&#039; .. uniterror<br /> end<br /> str2 = &#039;/&#039; .. areaunit2 .. uniterror<br /> end<br /> elseif(areaunit1 ~= &#039;&#039;) then<br /> if( disp ~= &#039;num&#039; ) then<br /> dens2 = &#039;?&#039;<br /> else<br /> dens2 = &#039;?&#039; .. uniterror<br /> end<br /> if(unit2) then<br /> str2 = &#039;/&#039; .. unitstr[unit2]<br /> elseif(areaunit2 ~= &#039;&#039;) then<br /> str2 = &#039;/&#039; .. areaunit2 .. uniterror <br /> end<br /> str1 = &#039;/&#039; .. areaunit1 .. uniterror<br /> end<br /> <br /> -- form output<br /> if( str2 ~= &#039;&#039; ) then<br /> -- has a converted unit<br /> if( disp ~= &#039;num&#039; and disp ~= &#039;table&#039; ) then<br /> -- display input and output density numbers with units<br /> if( flip == &#039;on&#039; ) then<br /> return (dens2sort or &#039;&#039;) .. dens2 .. str2 .. &#039; (&#039; .. dens1 .. str1 .. &#039;)&#039;<br /> else<br /> return (dens1sort or &#039;&#039;) .. dens1 .. str1 .. &#039; (&#039; .. dens2 .. str2 .. &#039;)&#039;<br /> end<br /> elseif( disp == &#039;table&#039;) then<br /> dens1 = (dens1sort or &#039;&#039;) .. dens1<br /> dens2 = (dens2sort or &#039;&#039;) .. dens2<br /> return pop .. &#039;||&#039; .. area1 .. &#039;||&#039; .. dens1 .. &#039;||&#039; .. dens2<br /> else<br /> -- display output density number without unit<br /> return dens2<br /> end<br /> else<br /> -- no converted unit<br /> if( disp ~= &#039;num&#039; and disp ~= &#039;table&#039; ) then<br /> -- display input density number with unit <br /> return (dens1sort or &#039;&#039;) .. dens1 .. str1 <br /> elseif( disp == &#039;table&#039;) then<br /> return pop .. &#039;||&#039; .. area1 .. &#039;||&#039; ..(dens1sort or &#039;&#039;) .. dens1<br /> else<br /> -- display input density number without unit<br /> return dens1<br /> end<br /> end<br /> end<br /> return &#039;&#039;<br /> end<br /> <br /> function p.density(frame)<br /> local args = (frame.args[3] ~= nil) and frame.args or frame:getParent().args<br /> return popdensity(<br /> args[1] or &#039;&#039;, args[2] or &#039;&#039;, args[3] or &#039;&#039;, args[4] or &#039;&#039;, <br /> args[&#039;prec&#039;] or &#039;&#039;, args[&#039;disp&#039;] or &#039;&#039;, args[&#039;flip&#039;] or &#039;&#039;<br /> )<br /> end<br /> <br /> return p</div> imported>Frietjes