A106773 Primes with digit sum = 40.

49999, 68899, 69997, 77899, 78889, 78979, 79699, 79987, 85999, 88789, 88897, 88969, 89599, 89689, 89779, 89797, 89959, 89977, 94999, 95989, 96799, 96979, 96997, 97789, 97879, 97987, 98689, 98779, 98869, 98887, 99679, 99787, 99859

Offset: 1

Author

Zak Seidov, May 16 2005

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. similar sequences listed in A244918.

Programs

Magma

[p: p in PrimesUpTo(100000) | &+Intseq(p) eq 40]; // Vincenzo Librandi, Jul 09 2014

Mathematica

Select[Prime[Range[10000]],Total[IntegerDigits[#]]==40&] (* Harvey P. Dale, Jul 19 2012 *)