This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A024351 #25 Nov 04 2018 14:46:20 %S A024351 5,17,29,47,59,71,89,101,113 %N A024351 Primes forming a 3 X 3 magic square with prime entries and minimal constant 177 = A164843(3). %C A024351 The minimal 3 X 3 magic square made of consecutive primes has constant 4440084513 = A073520(3) = A270305(1), cf. A073519. - _M. F. Hasler_, Oct 22 2018 %C A024351 Sequence A073473 gives a variant using "primes including 1" (for historical reasons), to which also refers A073502. - _M. F. Hasler_, Oct 24 2018 %H A024351 Harvey Heinz, <a href="http://www.magic-squares.net/primesqr.htm">Prime Magic Squares</a> %H A024351 <a href="/index/Mag#magic">Index entries for sequences related to magic squares</a> %e A024351 The square is [101 5 71 ; 29 59 89 ; 47 113 17]. %e A024351 The lexicographically smallest equivalent variant (modulo reflections on the symmetry axes of the square) is [17 89 71 ; 113 59 5 ; 47 29 101], cf. A320872. - _M. F. Hasler_, Oct 24 2018 %o A024351 (PARI) A024351=select(p->setsearch(P,118-p),P=primes(30)[^5]) \\ 118 = 2*59, where 59 is the central prime; primes(30) = primes < 118. For the magic square itself, use A320872_row(1). - _M. F. Hasler_, Oct 25 2018 %Y A024351 Cf. A073350, A073520, A270305, A164843. %Y A024351 Cf. A073473, A073502. %Y A024351 Cf. A320872 (3 X 3 magic squares of primes), A268790 (magic sums of these). %K A024351 fini,full,nonn %O A024351 1,1 %A A024351 Karl Schmerbauch (karl.j.schmerbauch(AT)boeing.com) %E A024351 Offset corrected by _Arkadiusz Wesolowski_, Nov 26 2011