A156617 Prime numbers where the last digit is the sum of all the previous digits.

11, 101, 167, 257, 347, 617, 1427, 1607, 2237, 2417, 3137, 3407, 4127, 4217, 10067, 10247, 10337, 10427, 10607, 11057, 12227, 13037, 13127, 13217, 14207, 15017, 15107, 16007, 20147, 20327, 20507, 21227, 21317, 21407, 22037, 22307, 23027

Offset: 1

Author

Parthasarathy Nambi, Feb 11 2009

Keywords

• nonn
• base

Examples

			3137 is a prime number where the last digit is the sum of all the previous digits.
		

Links

• R. L. Shepherd, Table of n, a(n) for n=1..1000
• Chris Caldwell, The First 1000 Primes

Crossrefs

Cf. A000040, A156307

Programs

Mathematica

Select[Prime[Range[3000]],Last[IntegerDigits[#]]==Total[ Most[ IntegerDigits[ #]]]&] (* Harvey P. Dale, Jan 30 2014 *)

Extensions

Extended and 11 added by Rick L. Shepherd, Feb 12 2009