A089344 Smallest prime(k) such that prime(k)-prime(k-n) is equal to prime(k+1)-prime(k).

5, 7, 619, 6581, 13933, 15823, 22307, 259033, 678659, 745757, 576791, 15014557, 35630467, 31515413, 264426203, 356604959, 364058659, 2529682091, 6868844179, 1457908691, 12799238129, 23294528897, 72106293983, 82160403553, 230966323927, 19187736221

Offset: 1

Author

Amarnath Murthy, Nov 05 2003

Keywords

• nonn

Examples

			a(4) = 6581, the next prime is 6599, 6599-6581 = 18, the four previous primes are 6563, 6569, 6571 and 6577. 6581-6563 = 18.
		

Links

• Giovanni Resta, Table of n, a(n) for n = 1..30

Crossrefs

Cf. A066496, A006562 (balanced primes), A117876, A118467.

Programs

Mathematica

f[n_] := Block[{k = n + 1}, While[ 2Prime[k] != Prime[k + 1] + Prime[k - n], k++ ]; Prime[k]]; Table[ f[n], {n, 17}] (* Robert G. Wilson v, Nov 11 2003 *)

Formula

a(n) = prime(A066496(n)). - Giovanni Resta, Apr 04 2017

Extensions

Corrected and extended by Ray Chandler and Robert G. Wilson v, Nov 07 2003

a(18)-a(21) from Fabien Sibenaler, Mar 15 2013

a(22)-a(26) from Giovanni Resta, Apr 04 2017