A095920 Numbers k such that k + (largest digit of k)! is a palindromic prime.

1, 10, 100, 253, 6271, 6371, 12611, 13621, 15331, 15431, 15641, 25763, 26473, 30187, 30287, 30713, 31603, 33743, 34633, 35033, 35233, 36553, 38167, 38467, 38567, 65167, 65467, 65567, 66277, 70517, 71327, 71627, 72337, 72437, 73447, 73747

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..500

Example

6271 is a term because 6271 + 7! = 11311.

Mathematica

ppQ[n_]:=Module[{c=n+Max[IntegerDigits[n]]!}, PrimeQ[c]&&PalindromeQ[c]]; Select[Range[75000], ppQ] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 30 2017 *)

Crossrefs

Cf. A054055, A002385.

Sequence in context: A208065 A207930 A207847 * A207602 A207028 A207173

Adjacent sequences: A095917 A095918 A095919 * A095921 A095922 A095923

Keyword

base,nonn

Author

Jason Earls, Jul 11 2004

Status

approved