login
Primes of the form n + product of nonzero digits of n, in order of their occurrence.
1

%I #7 Sep 06 2014 12:18:31

%S 2,11,23,29,41,47,67,109,89,107,101,167,181,223,199,227,251,293,283,

%T 349,331,433,347,461,313,383,353,379,431,457,379,443,521,547,457,491,

%U 593,499,557,673,601,823,619,653,839,607,617,631,659,673,659,743,929,919

%N Primes of the form n + product of nonzero digits of n, in order of their occurrence.

%C Primes in A063114.

%H K. D. Bajpai, <a href="/A246622/b246622.txt">Table of n, a(n) for n = 1..13250</a>

%e a(2) = 11 which is prime. Also, 11 = 10 + 1, which is n + product of nonzero digit of n.

%e a(9) = 89 which is prime. Also, 89 = 81 + (8*1), which is n + product of nonzero digits of n.

%e a(10) = 107 which is prime. Also, 107 = 83 + (8*3), which is n + product of nonzero digits of n.

%t Select[Table[n + Times @@ DeleteCases[IntegerDigits[n], 0], {n, 1000}], PrimeQ]

%Y Cf. A000040, A063114, A063543.

%K nonn,base

%O 1,1

%A _K. D. Bajpai_, Aug 31 2014