login
A232183
Primes p such that p-R(p) is a square, where R = reversal of digits = A004086.
1
2, 3, 5, 7, 11, 43, 73, 101, 131, 151, 181, 191, 313, 353, 373, 383, 727, 757, 787, 797, 919, 929, 2141, 2251, 4253, 4363, 4583, 6701, 7211, 7321, 7541, 8147, 8923, 9103, 9323, 9433, 10301, 10501, 10601, 11311, 11411, 12421, 12721, 12821, 13331, 13831, 13931, 14341, 14741
OFFSET
1,1
COMMENTS
This sequence includes the palindromic primes for which p-R(p)=0. See A080177 = (43,73,2141,2251,4253,4363,...) for the variant not including palindromes.
PROG
(PARI) forprime(p=1, 19999, issquare(p-A004086(p))&&print1(p", "))
CROSSREFS
Sequence in context: A237438 A040130 A127727 * A289862 A036343 A058253
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Nov 20 2013
STATUS
approved