(20 & 21th century)
m
Line 19: Line 19:
 
|list12=[[2010]]{{*}}[[2011]]{{*}}[[2012]]{{*}}[[2013]]{{*}}[[2014]]{{*}}[[2015]]{{*}}[[2016]]{{*}}[[2017]]{{*}}[[2018]]{{*}}[[2019]]
 
|list12=[[2010]]{{*}}[[2011]]{{*}}[[2012]]{{*}}[[2013]]{{*}}[[2014]]{{*}}[[2015]]{{*}}[[2016]]{{*}}[[2017]]{{*}}[[2018]]{{*}}[[2019]]
 
}}
 
}}
 +
 +
<noinclude>
 +
Generated using this Mathematica code:
 +
<pre>
 +
StringJoin @@
 +
Table[If[Mod[i, 10] == 9,
 +
  "[[" <> ToString[i] <> "]]\n |list=" <>
 +
    ToString[Evaluate[Round[(i - 1900)/10.] + 1]],
 +
  "[[" <> ToString[i] <> "]]{{*}}"], {i, 1900, 2000}]
 +
</pre>
 +
</noinclude>

Revision as of 16:19, 18 May 2019


Generated using this Mathematica code:

StringJoin @@ 
 Table[If[Mod[i, 10] == 9, 
   "[[" <> ToString[i] <> "]]\n |list=" <> 
    ToString[Evaluate[Round[(i - 1900)/10.] + 1]], 
   "[[" <> ToString[i] <> "]]{{*}}"], {i, 1900, 2000}]