login
A046493
Primes expressible as the sum of 3 consecutive palindromic primes.
0
23, 383, 463, 523, 857, 1039, 1109, 1483, 1867, 2341, 2503, 12149, 32413, 37963, 38873, 39983, 43013, 44533, 52103, 53623, 56053, 59273, 90709, 91309, 91909, 93329, 94849, 96259, 111409, 180007, 215461, 219001, 219911, 224351, 233941
OFFSET
1,1
EXAMPLE
12149 = 919 + 929 + 10301.
MATHEMATICA
palQ[n_] := Reverse[x = IntegerDigits[n]] == x; t = Select[Prime[Range[7750]], palQ]; Select[Total /@ Partition[t, 3, 1], PrimeQ] (* Jayanta Basu, Jun 26 2013 *)
CROSSREFS
Sequence in context: A016324 A264321 A285234 * A014926 A353117 A016267
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1998
STATUS
approved