A225319 Prime numbers p such that p - (product of digits of p) is also prime.

23, 29, 41, 43, 47, 83, 89, 101, 103, 107, 109, 127, 149, 181, 223, 227, 229, 241, 251, 263, 271, 277, 293, 307, 347, 349, 367, 383, 389, 401, 409, 419, 431, 433, 439, 457, 479, 487, 503, 509, 541, 587, 601, 607, 631, 641, 643, 647, 653, 659, 673, 677, 701

Offset

1,1

Links

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

Example

29 is in the list since 29 - (2*9) = 11 is a prime.

Mathematica

Select[Prime[Range[126]], PrimeQ[#-Times@@IntegerDigits[#]] &]

Crossrefs

Cf. A157677.

Sequence in context: A174196 A144226 A173709 * A228139 A094383 A166565

Adjacent sequences: A225316 A225317 A225318 * A225320 A225321 A225322

Keyword

nonn,base

Author

Jayanta Basu, May 05 2013

Status

approved