OFFSET
1,1
COMMENTS
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
Sequence A073473 gives a variant using "primes including 1" (for historical reasons), to which also refers A073502. - M. F. Hasler, Oct 24 2018
LINKS
EXAMPLE
The square is [101 5 71 ; 29 59 89 ; 47 113 17].
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
PROG
(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
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Karl Schmerbauch (karl.j.schmerbauch(AT)boeing.com)
EXTENSIONS
Offset corrected by Arkadiusz Wesolowski, Nov 26 2011
STATUS
approved