A107637 - OEIS

%I #20 Feb 19 2024 03:19:56

%S 11,19,79,223,383,971,2113,3041,3209,3631,4261,4657,5179,5683,6163,

%T 6263,6397,7187,7517,10151,12037,12757,14669,15551,16187,16993,17707,

%U 18523,19603,22697,23911,26153,27803,27947,29027,29917,30047,30839,30893,33161,33377

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

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

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

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

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

%K nonn

%O 1,1

%A _Zak Seidov_, May 19 2005