A106779 Primes with digit sum = 49.

598999, 599899, 679999, 688999, 697999, 698899, 769999, 779899, 787999, 789979, 798799, 799789, 868999, 869899, 869989, 878989, 879799, 879979, 886999, 887989, 888799, 888997, 889699, 889879, 898897, 898987, 899779, 967999, 969889, 978799

Offset: 1

Author

Zak Seidov, May 16 2005

Keywords

• nonn
• base

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..2700

Crossrefs

Cf. similar sequences listed in A244918.

Programs

Magma

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

Mathematica

Select[Prime[Range[990000]], Total[IntegerDigits[#]]==49 &] (* Vincenzo Librandi, Jul 09 2014 *)