A107618 Primes with digit sum = 64.
19999999, 29999899, 29999989, 39979999, 39999979, 47999899, 48899899, 48989989, 48997999, 48999799, 48999889, 49989799, 49999699, 49999897, 56999989, 58799899, 58898989, 58988899, 58997899, 59698999, 59788999
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..700
Crossrefs
Programs
-
Magma
[p: p in PrimesUpTo(69000000) | &+Intseq(p) eq 64]; // Vincenzo Librandi, Jul 09 2014
-
Mathematica
Select[Prime[Range[3600000]],Total[IntegerDigits[#]]==64&] (* Harvey P. Dale, Jan 19 2012 *)