A037131 a(n) = (nextprime(4^n) - nextprime(2^n))/2.
0, 1, 6, 28, 120, 497, 2016, 8140, 32640, 130813, 523776, 2096133, 8386580, 33550335, 134209524, 536854528, 2147450887, 8589869054, 34359607310, 137438691321, 549755289604, 2199022206975, 8796090925052, 35184367894531, 140737479966709, 562949936644106
Offset: 0
Keywords
Programs
-
Mathematica
Table[(NextPrime[4^n]-NextPrime[2^n])/2,{n,0,30}] (* Harvey P. Dale, May 26 2011 *)
Formula
a(n) = A037130(n) / 2. - Sean A. Irvine, Dec 09 2020
Extensions
More terms from Sean A. Irvine, Dec 09 2020