%I #9 Sep 08 2022 08:45:18

%S 49999,68899,69997,77899,78889,78979,79699,79987,85999,88789,88897,

%T 88969,89599,89689,89779,89797,89959,89977,94999,95989,96799,96979,

%U 96997,97789,97879,97987,98689,98779,98869,98887,99679,99787,99859

%N Primes with digit sum = 40.

%H Harvey P. Dale, <a href="/A106773/b106773.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[10000]],Total[IntegerDigits[#]]==40&] (* _Harvey P. Dale_, Jul 19 2012 *)

%o (Magma) [p: p in PrimesUpTo(100000) | &+Intseq(p) eq 40]; // _Vincenzo Librandi_, Jul 09 2014

%Y Cf. similar sequences listed in A244918.

%K nonn,base

%O 1,1

%A _Zak Seidov_, May 16 2005