A106718 Smallest of five consecutive primes whose sum of digits is prime.

2, 311, 1091, 1291, 2063, 2069, 2551, 2557, 3163, 3251, 3253, 3257, 3259, 3659, 4133, 4139, 4153, 4373, 4391, 4397, 4409, 5413, 7079, 7103, 7411, 8597, 9833, 10079, 12071, 12073, 12301, 12433, 12437, 12983, 14293, 14303, 14321, 14323, 14327

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

a(2)=311 is a term because this is smallest of five consecutive primes i.e. 311,313,317,331 and 337, whose sum of digits is prime i.e. 3+1+1=5, 3+1+3=7, 3+1+7=11, 3+3+1=7 and 3+3+7=13.

Mathematica

Select[Partition[Prime[Range[2000]], 5, 1], AllTrue[Total[#]&/@ (IntegerDigits/@ #), PrimeQ]&][[All, 1]] (* Harvey P. Dale, Jul 16 2021 *)

Crossrefs

Sequence in context: A199946 A142800 A115438 * A119779 A118579 A349272

Adjacent sequences: A106715 A106716 A106717 * A106719 A106720 A106721

Keyword

base,nonn

Author

Shyam Sunder Gupta, May 14 2005

Status

approved