A134926 - OEIS

%I #6 Apr 12 2025 11:20:52

%S 11,12,18,19,23,24,26,27,33,34,39,40,41,42,44,45,48,49,56,57,63,64,65,

%T 66,78,79,81,82,83,84,86,87,105,106,111,112,116,117,125,126,128,129,

%U 131,132,138,139,146,147,153,154,158,159,165,166

%N Nearest-neighbors of odd isolated primes, divided by 2.

%t ip=Select[Prime[Range[2,67]],NoneTrue[{#-2,#+2},PrimeQ]&];Union[Flatten[Table[n+{1, -1}, {n, ip}]/2]] (* _James C. McMahon_, Apr 12 2025 *)

%Y Cf. A134924.

%K easy,nonn

%O 1,1

%A _Omar E. Pol_, Nov 27 2007