A106786 Primes with digit sum = 59.
6999899, 6999989, 7799999, 7899989, 8789999, 8799899, 8879999, 8899799, 8899997, 8988989, 8998889, 8999699, 8999789, 8999897, 9797999, 9799997, 9869999, 9889799, 9889889, 9898799
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1800
Crossrefs
Cf. similar sequences listed in A244918.
Programs
-
Magma
[p: p in PrimesUpTo(10000000) | &+Intseq(p) eq 59]; // Vincenzo Librandi, Jul 09 2014
-
Mathematica
Select[Prime[Range[1000000]], Total[IntegerDigits[#]]==59 &] (* Vincenzo Librandi, Jul 09 2014 *)