A088268 Palindromes in A007530.

5, 11, 101, 191, 16061, 1748471, 179868971, 11027472011, 13160106131, 15130003151, 15843234851, 16420302461, 16782228761, 16861316861, 17060706071, 17374347371, 18491419481, 18697979681, 19497279491

Offset: 1

Author

Amarnath Murthy, Sep 28 2003

Keywords

• base
• nonn

Comments

Conjecture: Sequence is finite.

Crossrefs

Cf. A007530.

Programs

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 *)

Extensions

More terms from David Wasserman, Jul 28 2005