A107637 Larger prime in pair prime(k) +/- k for some k.

11, 19, 79, 223, 383, 971, 2113, 3041, 3209, 3631, 4261, 4657, 5179, 5683, 6163, 6263, 6397, 7187, 7517, 10151, 12037, 12757, 14669, 15551, 16187, 16993, 17707, 18523, 19603, 22697, 23911, 26153, 27803, 27947, 29027, 29917, 30047, 30839, 30893, 33161, 33377

Offset

1,1

Links

Table of n, a(n) for n=1..41.

Formula

a(n) = prime(A064403(n)) + A064403(n).

Example

Prime 11 is a term because 11 = prime(4)+4 and 3 = prime(4)-4 is also a prime.

Mathematica

R=3000; L=Select[Range[R], AllTrue[Prime[#]+{#, -#}, PrimeQ]&]; Prime/@L+L (* James C. McMahon, Feb 18 2024 *)

Crossrefs

Cf. A064403 (values of k), A107636 (prime(k)-k), A143794 (prime(k)).

Sequence in context: A344042 A335410 A106231 * A229542 A039365 A103201

Adjacent sequences: A107634 A107635 A107636 * A107638 A107639 A107640

Keyword

nonn

Author

Zak Seidov, May 19 2005

Status

approved