A106758 Primes with digit sum = 17.

89, 179, 197, 269, 359, 449, 467, 557, 593, 647, 683, 719, 773, 809, 827, 863, 881, 953, 971, 1097, 1187, 1259, 1277, 1367, 1439, 1493, 1583, 1619, 1637, 1709, 1871, 1907, 2069, 2087, 2267, 2339, 2357, 2393, 2447, 2591, 2609, 2663, 2753, 2843, 2861, 3167

Offset: 1

Author

Zak Seidov, May 16 2005

Keywords

• nonn
• base

Links

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

Crossrefs

Cf. similar sequences listed in A244918.

Programs

Magma

[p: p in PrimesUpTo(4000) | &+Intseq(p) eq 17]; // Vincenzo Librandi, Jul 08 2014

Mathematica

Select[Prime[Range[10000]], Total[IntegerDigits[#]]==17 &] (* Vincenzo Librandi, Jul 08 2014 *)