%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