A106768 Primes with digit sum = 32.
6899, 8699, 8969, 9689, 9887, 16889, 16979, 17789, 17987, 18797, 18869, 18959, 19697, 19949, 24989, 25799, 25889, 25997, 26699, 26879, 26987, 27689, 27779, 28499, 28697, 28859, 28949, 29399, 29669, 29759, 29867, 32999, 35879, 35897
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..6200
Crossrefs
Cf. similar sequences listed in A244918.
Programs
-
Magma
[p: p in PrimesUpTo(40000) | &+Intseq(p) eq 32]; // Vincenzo Librandi, Jul 08 2014
-
Mathematica
Select[Prime[Range[10000]], Total[IntegerDigits[#]]==32 &] (* Vincenzo Librandi, Jul 08 2014 *)
-
PARI
select(x->sumdigits(x)==32, primes(4000)) \\ Michel Marcus, Jul 08 2014