A088286 Primes in A088285. Palindromic primes in which the sum of the internal digits = the sum of the external digits.

7046407, 7136317, 7226227, 7250527, 7324237, 701282107, 701525107, 701606107, 702343207, 705121507, 712161217, 713060317, 714040417, 720262027, 720343027, 721080127, 721242127, 721404127, 722222227, 722303227, 723121327, 723202327

Offset

1,1

Comments

All members begin with 7. - David Wasserman, Aug 04 2005

Links

Chai Wah Wu, Table of n, a(n) for n = 1..710

Example

7136317 is a prime and 7+7 = 14 = 1+3+6+3+1.

Mathematica

Select[Prime[Range[37392000]], With[{id=IntegerDigits[#]}, PalindromeQ[ #] && id[[1]]+id[[-1]] == Total[Most[Rest[id]]]]&]//Quiet (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 18 2021 *)

Crossrefs

Intersection of A002385 and A101317.

Cf. A088285.

Sequence in context: A206634 A253313 A253661 * A175530 A320623 A218099

Adjacent sequences: A088283 A088284 A088285 * A088287 A088288 A088289

Keyword

base,nonn

Author

Amarnath Murthy, Sep 29 2003

Extensions

More terms from David Wasserman, Aug 04 2005

Status

approved