%I #7 Sep 08 2022 08:45:18
%S 389,479,569,587,659,677,839,857,929,947,983,1289,1487,1559,1667,1847,
%T 1973,2099,2297,2459,2477,2549,2657,2693,2729,2819,2837,2909,2927,
%U 2963,3089,3359,3449,3467,3539,3557,3593,3719,3863,3881,3917,4079,4259,4349
%N Primes with digit sum = 20.
%H Vincenzo Librandi, <a href="/A106760/b106760.txt">Table of n, a(n) for n = 1..9000</a>
%t Select[Prime[Range[2000]], Total[IntegerDigits[#]]==20 &] (* _Vincenzo Librandi_, Jul 08 2014 *)
%o (Magma) [p: p in PrimesUpTo(5000) | &+Intseq(p) eq 20]; // _Vincenzo Librandi_, Jul 08 2014
%Y Cf. similar sequences listed in A244918.
%K nonn,base
%O 1,1
%A _Zak Seidov_, May 16 2005