cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A330284 Numbers k such that both k and k+2 are de Polignac numbers (A006285).

Original entry on oeis.org

905, 3341, 3431, 4151, 4811, 4841, 5729, 7387, 7811, 8921, 10235, 10511, 11081, 11435, 12371, 12731, 13091, 14021, 14141, 14381, 14531, 15041, 15119, 16025, 16865, 17369, 18209, 18611, 18895, 18897, 20141, 20321, 20381, 20651, 21671, 24131, 24431, 24461, 24731
Offset: 1

Views

Author

Amiram Eldar, Dec 13 2019

Keywords

Comments

The first 3 pairs are given in the book by Wells.

Examples

			905 is in the sequence since both 905 and 905 + 2 = 907 are de Polignac numbers.
		

References

  • Alfred S. Posamentier and Ingmar Lehmann, Mathematical Curiosities: A Treasure Trove of Unexpected Entertainments, Prometheus Books, 2014, Chapter 1.
  • David Wells, Prime Numbers: The Most Mysterious Figures in Math, John Wiley & Sons Inc., Hoboken, New Jersey, 2005, page 176.

Crossrefs

Cf. A006285.

Programs

  • Mathematica
    dePolQ[n_] := AllTrue[n - 2^Range[Floor[Log[2, n]]], !PrimeQ[#] &]; seq = {}; q1 = False; Do[q2 = dePolQ[n]; If[q1 && q2, AppendTo[seq, n - 2]]; q1 = q2, {n, 3, 25000, 2}]; seq