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.

A114137 Difference between first odd semiprime > 2^n and 2^n.

Original entry on oeis.org

8, 7, 5, 1, 5, 1, 1, 1, 3, 3, 3, 1, 1, 1, 3, 5, 9, 1, 5, 1, 1, 5, 7, 1, 3, 3, 3, 3, 1, 9, 25, 1, 1, 11, 7, 3, 7, 15, 19, 3, 1, 5, 3, 1, 31, 3, 7, 21, 3, 9, 7, 11, 3, 11, 3, 29, 9, 29, 25, 9, 45, 1, 3, 9, 1
Offset: 0

Views

Author

Jonathan Vos Post, Feb 03 2006

Keywords

Comments

A098147 is difference between first odd semiprime > 10^n and 10^n. In this powers of 2 sequence, does 1 occur infinitely often? Does every odd number occur?

Examples

			a(0) = 8 (the only even value here) because 2^0 + 8 = 9 = 3^2 is an odd semiprime.
a(1) = 7 because 2^1 + 7 = 9 = 3^2 is an odd semiprime.
a(2) = 5 because 2^2 + 5 = 9 = 3^2 is an odd semiprime.
a(3) = 1 because 2^3 + 1 = 9 = 3^2 is an odd semiprime.
a(4) = 5 because 2^4 + 5 = 21 = 3 * 7 is an odd semiprime.
a(5) = 1 because 2^5 + 1 = 33 = 3 * 11 is an odd semiprime.
a(6) = 1 because 2^6 + 1 = 65 = 5 * 13 is an odd semiprime.
a(10) = 3 because 2^10 + 3 = 1027 = 13 * 79 is an odd semiprime.
a(30) = 25 because 2^30 + 25 = 1073741849 = 29 * 37025581 is an odd semiprime.
		

Crossrefs

Programs

  • Mathematica
    a[n_] := Block[{z}, If[n == 0, z = 3, z = 2^n + 1]; While[ PrimeOmega[z] != 2, z += 2]; z - 2^n]; a /@ Range[0, 64] (* Giovanni Resta, Jun 14 2016 *)

Formula

a(n) = minimum integer k such that 2^n + k is an element of A046315. a(n) = minimum integer k such that A000079(n) + k is an element of A046315.

Extensions

a(46) corrected by Giovanni Resta, Jun 14 2016