A134924 Nearest-neighbors of isolated primes.

1, 3, 22, 24, 36, 38, 46, 48, 52, 54, 66, 68, 78, 80, 82, 84, 88, 90, 96, 98, 112, 114, 126, 128, 130, 132, 156, 158, 162, 164, 166, 168, 172, 174, 210, 212, 222, 224, 232, 234, 250, 252, 256, 258, 262, 264, 276, 278, 292, 294, 306, 308

Offset

1,2

Links

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

Martin Burtscher, Igor Szczyrba, and Rafał Szczyrba, Analytic Representations of the n-anacci Constants and Generalizations Thereof, Journal of Integer Sequences, Vol. 18 (2015), Article 15.4.5.

Mathematica

ip=Select[Prime[Range[65]], NoneTrue[{#-2, #+2}, PrimeQ]&]; Union[Flatten[Table[n+{1, -1}, {n, ip}]]] (* James C. McMahon, Apr 12 2025 *)

Crossrefs

Cf. A007510, A045718, A134926, A134930.

Sequence in context: A360366 A072398 A381528 * A042547 A269799 A079039

Adjacent sequences: A134921 A134922 A134923 * A134925 A134926 A134927

Keyword

easy,nonn

Author

Omar E. Pol, Nov 27 2007

Status

approved