A046490 Palindromes expressible as the sum of 2 consecutive palindromic primes.

5, 8, 232, 282, 666, 20802, 21912, 22722, 23832, 60306, 60606, 61816, 62526, 63836, 64746, 65956, 69896, 2078702, 2098902, 2237322, 2243422, 2249422, 2279722, 2295922, 2397932, 2409042, 2427242, 2439342, 2456542, 2477742, 2485842

Offset

1,1

Links

Table of n, a(n) for n=1..31.

P. De Geest, World!Of Palindromic Primes

Example

666 = 313 + 353; 60606 = 30203 + 30403.

Mathematica

palQ[n_] := Reverse[x = IntegerDigits[n]] == x; t = Select[Prime[Range[96000]], palQ]; Select[Total /@ Partition[t, 2, 1], palQ] (* Jayanta Basu, Jun 26 2013 *)
Select[Total/@Partition[Select[Prime[Range[100000]], PalindromeQ], 2, 1], PalindromeQ] (* Harvey P. Dale, Sep 06 2021 *)

Crossrefs

Cf. A002113, A002385, A046491.

Sequence in context: A151827 A258044 A162571 * A155214 A028934 A297559

Adjacent sequences: A046487 A046488 A046489 * A046491 A046492 A046493

Keyword

nonn,base

Author

Patrick De Geest, Sep 15 1998

Status

approved