login
A088268
Palindromes in A007530.
0
5, 11, 101, 191, 16061, 1748471, 179868971, 11027472011, 13160106131, 15130003151, 15843234851, 16420302461, 16782228761, 16861316861, 17060706071, 17374347371, 18491419481, 18697979681, 19497279491
OFFSET
1,1
COMMENTS
Conjecture: Sequence is finite.
MATHEMATICA
Select[Prime[Range[8611*10^5]], AllTrue[#+{2, 6, 8}, PrimeQ] && PalindromeQ[ #]&] (* Requires Mathematica version 10 or later *) (* The program will take a long time to run *) (* Harvey P. Dale, Mar 11 2019 *)
CROSSREFS
Cf. A007530.
Sequence in context: A096473 A007530 A157967 * A030085 A022006 A201074
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Sep 28 2003
EXTENSIONS
More terms from David Wasserman, Jul 28 2005
STATUS
approved