A114137 Difference between first odd semiprime > 2^n and 2^n.
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
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.
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
Extensions
a(46) corrected by Giovanni Resta, Jun 14 2016
Comments