|
%I #7 Sep 08 2022 08:45:18
%S 199999,289999,298999,379999,389989,398989,399979,478999,489799,
%T 496999,497899,497989,499879,499897,499969,568999,587989,596899,
%U 597889,597997,598789,598987,599779,599869,599959,659899,667999,668989,679699,679879
%N Primes with digit sum = 46.
%H Vincenzo Librandi, <a href="/A106777/b106777.txt">Table of n, a(n) for n = 1..3400</a>
%t Select[Prime[Range[450000]], Total[IntegerDigits[#]]==46 &] (* _Vincenzo Librandi_, Jul 09 2014 *)
%o (Magma) [p: p in PrimesUpTo(700000) | &+Intseq(p) eq 46]; // _Vincenzo Librandi_, Jul 09 2014
%Y Cf. similar sequences listed in A244918.
%K nonn,base
%O 1,1
%A _Zak Seidov_, May 16 2005
|
