OFFSET
1,1
COMMENTS
Primes of the form 8*k^2 - 8*k + 1.
LINKS
OEIS Wiki, Figurate numbers
Eric Weisstein's World of Mathematics, Centered Polygonal Number
Eric Weisstein's World of Mathematics, Prime Number
MATHEMATICA
Select[Table[8k^2-8k+1, {k, 0, 100}], PrimeQ] (* Harvey P. Dale, Mar 08 2023 *)
PROG
(PARI) for(n=1, 1e3, if(isprime(k=8*n^2-8*n+1), print1(k, ", "))) \\ Altug Alkan, Nov 26 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Nov 26 2015
STATUS
approved