A096215 Greatest primes not greater than the sum of two succeeding primes.

5, 7, 11, 17, 23, 29, 31, 41, 47, 59, 67, 73, 83, 89, 97, 109, 113, 127, 137, 139, 151, 157, 167, 181, 197, 199, 199, 211, 211, 239, 257, 263, 271, 283, 293, 307, 317, 317, 337, 349, 359, 367, 383, 389, 389, 409, 433, 449, 449, 461, 467, 479, 491, 503, 509, 523

Offset: 1

Author

Reinhard Zumkeller, Jul 28 2004

Keywords

• nonn

Links

• Paolo Xausa, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A001043, A007917.

Programs

Mathematica

NextPrime[ListConvolve[{1,1},Prime[Range[100]]]+1,-1] (* Paolo Xausa, Nov 02 2023 *)

Formula

a(n) = A007917(A001043(n)).