A106780 Primes with digit sum = 50.

599999, 788999, 799979, 888989, 889997, 897899, 898889, 969989, 979889, 988979, 996899, 997889, 998897, 998969, 999599, 999959, 1598999, 1699799, 1789979, 1798997, 1799969, 1859999, 1886999, 1888979, 1889969, 1896899, 1896989, 1897979, 1899797

Offset: 1

Author

Zak Seidov, May 16 2005

Keywords

• nonn
• base

Links

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

Crossrefs

Cf. similar sequences listed in A244918.

Programs

Magma

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

Mathematica

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

Extensions

More terms from Vincenzo Librandi, Jul 09 2014