Number of composite numbers around 2^n.
0, 1, 3, 3, 5, 5, 3, 5, 11, 9, 13, 5, 17, 29, 21, 15, 29, 7, 21, 9, 25, 17, 23, 45, 73, 19, 67, 59, 13, 37, 11, 19, 25, 65, 83, 35, 33, 51, 29, 101, 47, 25, 85, 23, 113, 35, 119, 79, 149, 81, 149, 67, 115, 191, 57, 85, 21, 95, 185, 125, 15, 191, 53, 71, 179, 13, 21
1
T. D. Noe, Plot of 1000 terms
T. D. Noe, Table of 1000 terms
(Mma) Join[{0}, Table[NextPrime[2^n] - NextPrime[2^n, -1] - 1, {n, 2, 50}]]
nonn
T. D. Noe, Mar 09 2015