A135373 a(n) = prime(2^(n + 1)) - prime(2^n).

1, 4, 12, 34, 78, 180, 408, 900, 2052, 4490, 9702, 21010, 45144, 96486, 205590, 435548, 920896, 1938594, 4072946, 8535970, 17845982, 37242540, 77569570, 161300102, 334906956, 694329000, 1437620932, 2972973918, 6141189354, 12672042908, 26122458858, 53799031890

Offset: 0

Author

Marvin Ray Burns, Dec 09 2007

Keywords

• nonn

Crossrefs

Cf. A000040, A033844, A135371.

Programs

Mathematica

Table[Prime[2^(n + 1)] - Prime[2^n], {n, 0, 40}]
#[[2]]-#[[1]]&/@Partition[Prime[2^Range[0,30]],2,1] (* Harvey P. Dale, Feb 21 2015 *)

PARI

a(n) = prime(2^(n + 1)) - prime(2^n); \\ Michel Marcus, Nov 15 2020

Formula

a(n) = A033844(n+1) - A033844(n). - Jinyuan Wang, Nov 14 2020

Extensions

a(29)-a(31) from Jinyuan Wang, Nov 14 2020