|
COMMENT
|
a(n) is an intersection of the Palindromic primes = A002385(n) = {2, 3, 5, 7, 11, 101, 131, 151, ...} and the Centered 10-gonal numbers = A062786(n) = {1, 11, 31, 61, 101, 151, ...}. Corresponding numbers n such that 5n^2 + 5n + 1 is a term of A134462 are listed in A134463 = {1, 4, 5, 565, 475081, ...}. Note that the first 4 terms of A134463 are the palindromes.
|
|
MATHEMATICA
|
Do[ f=5k^2+5k+1; If[ PrimeQ[f] && FromDigits[ Reverse[ IntegerDigits[ f ] ] ] == f, Print[ f ] ], {k, 1, 500000} ]
|