|
%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
|
