A118776 Differences between consecutive Chen primes.

1, 2, 2, 4, 2, 4, 2, 4, 6, 2, 6, 4, 6, 6, 6, 8, 4, 12, 6, 12, 6, 2, 4, 14, 4, 6, 2, 10, 8, 10, 12, 2, 10, 6, 2, 12, 16, 6, 6, 12, 6, 6, 6, 12, 12, 14, 4, 6, 20, 10, 6, 6, 20, 10, 12, 8, 10, 12, 12, 6, 12, 6, 12, 8, 4, 8, 4, 6, 12, 20, 16, 6, 6, 2, 6, 10, 12, 18, 14, 10, 6, 6, 6, 18, 6, 18, 18, 24

Offset

1,2

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

chenQ[n_] := PrimeQ[n] && PrimeOmega[n + 2] < 3; Differences@ Select[Range[750], chenQ] (* Amiram Eldar, Oct 19 2021 *)

Crossrefs

Cf. A001223, A109611.

Sequence in context: A255311 A075526 A001223 * A249867 A351612 A092520

Adjacent sequences: A118773 A118774 A118775 * A118777 A118778 A118779

Keyword

nonn

Author

Luc Stevens (lms022(AT)yahoo.com), May 22 2006

Status

approved