login
Primes with digit sum = 38.
3

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

%S 39989,48989,56999,57899,58889,58979,58997,59699,59879,67979,68699,

%T 68879,68897,69779,69959,75989,77699,77969,78779,78797,78887,78977,

%U 79589,79697,79769,79967,85889,86969,87797,87869,87887,87959,87977

%N Primes with digit sum = 38.

%H Vincenzo Librandi, <a href="/A106772/b106772.txt">Table of n, a(n) for n = 1..4500</a>

%t Select[Prime[Range[150000]], Total[IntegerDigits[#]]==38 &] (* _Vincenzo Librandi_, Jul 09 2014 *)

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

%Y Cf. similar sequences listed in A244918.

%K nonn,base

%O 1,1

%A _Zak Seidov_, May 16 2005