https://oer.opendeved.net/index.php?action=history&feed=atom&title=File%3APrimeProgression.png
File:PrimeProgression.png - Revision history
2026-04-27T03:19:45Z
Revision history for this page on the wiki
MediaWiki 1.38.2
https://oer.opendeved.net/index.php?title=File:PrimeProgression.png&diff=8511&oldid=prev
SimonKnight: http://en.wikipedia.org/wiki/File:Prime_numbers_in_arithmetic_progression_mod_9_zoom_in.png
Description
English: prime numbers in arithmetic progression mod 9
Mathematica source code
Show[Graphics [ {Table[{RGBColor[1, 0, 0], Rectangle[{IntegerPart...
2012-09-19T11:50:58Z
<p>http://en.wikipedia.org/wiki/File:Prime_numbers_in_arithmetic_progression_mod_9_zoom_in.png Description English: prime numbers in arithmetic progression mod 9 Mathematica source code Show[Graphics [ {Table[{RGBColor[1, 0, 0], Rectangle[{IntegerPart...</p>
<p><b>New page</b></p><div>http://en.wikipedia.org/wiki/File:Prime_numbers_in_arithmetic_progression_mod_9_zoom_in.png<br />
<br />
Description <br />
English: prime numbers in arithmetic progression mod 9<br />
<br />
Mathematica source code<br />
Show[Graphics [ {Table[{RGBColor[1, 0, 0], Rectangle[{IntegerPart[Prime[n]/r], Mod[Prime[n] - 1, r]}, {IntegerPart[ Prime[n]/r] + 1, Mod[Prime[n] - 1, r] + 1}]}, {n, 1, 9}], Table[{Text[n, {IntegerPart[(n - 1)/r] + .5, Mod[n - 1, r] + .5}]}, {n, 1, 27}] }], AspectRatio -> Automatic, TextStyle -> {FontFamily -> "Arial ", FontSize -> 14, FontStyle -> "Bold"}]<br />
Date 25 January 2011<br />
Source Own work<br />
Author Jakob.scholbach</div>
SimonKnight