login
A106773
Primes with digit sum = 40.
5
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,1
LINKS
MATHEMATICA
Select[Prime[Range[10000]], Total[IntegerDigits[#]]==40&] (* Harvey P. Dale, Jul 19 2012 *)
PROG
(Magma) [p: p in PrimesUpTo(100000) | &+Intseq(p) eq 40]; // Vincenzo Librandi, Jul 09 2014
CROSSREFS
Cf. similar sequences listed in A244918.
Sequence in context: A023944 A159233 A145538 * A249540 A271115 A269475
KEYWORD
nonn,base
AUTHOR
Zak Seidov, May 16 2005
STATUS
approved