A207527 Primes that are the sum of three consecutive primes in A034962.

131, 251, 337, 503, 743, 929, 1447, 1597, 3023, 3919, 4051, 4157, 5087, 5897, 6133, 7649, 7877, 8269, 9181, 9433, 9721, 11411, 11677, 13151, 13757, 14009, 14533, 18133, 18493, 18743, 20563, 21023, 21247, 22651, 22921, 23057, 23801, 23893, 24359, 24733, 24809

Offset

1,1

Links

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

Mathematica

t = Select[Table[Prime[n] + Prime[n + 1] + Prime[n + 2], {n, 1000}], PrimeQ]; Select[Table[t[[n]] + t[[n + 1]] + t[[n + 2]], {n, Length[t] - 2}], PrimeQ]
Select[Total/@Partition[With[{nn=500}, Select[Total/@Partition[Prime[Range[nn]], 3, 1], PrimeQ]], 3, 1], PrimeQ] (* Harvey P. Dale, Feb 16 2026 *)

Crossrefs

Cf. A034962.

Sequence in context: A033206 A107001 A142616 * A132249 A033548 A117477

Adjacent sequences: A207524 A207525 A207526 * A207528 A207529 A207530

Keyword

nonn,easy

Author

Vladimir Joseph Stephan Orlovsky, Feb 18 2012

Status

approved