Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #11 Nov 18 2015 11:38:25
%S 2,3,5,7,11,13,4673,5153,8513,16673,17895719,17899799,17985809,
%T 18288929,34697489,40964369,118563089,286337041,286359841,293675281,
%U 403775761,554766721,554795281,73303933201,74109227281,1172812415521,1172812443937,1172812468507
%N Prime numbers such that sum of digits in base 16 equals product of digits in base 16.
%H Chai Wah Wu, <a href="/A260904/b260904.txt">Table of n, a(n) for n = 1..6023</a>
%e 16673_10 = 4121_16 is prime and the sum of digits of 4121 equals the product of digits.
%t Select[Prime@ Range[10^7], Total@ # == Times @@ # &@ IntegerDigits[#, 16] &] (* _Michael De Vlieger_, Nov 18 2015 *)
%Y Cf. A066306.
%K nonn,base
%O 1,1
%A _Chai Wah Wu_, Nov 17 2015