|
%I #13 Nov 15 2020 03:48:39
%S 1,4,12,34,78,180,408,900,2052,4490,9702,21010,45144,96486,205590,
%T 435548,920896,1938594,4072946,8535970,17845982,37242540,77569570,
%U 161300102,334906956,694329000,1437620932,2972973918,6141189354,12672042908,26122458858,53799031890
%N a(n) = prime(2^(n + 1)) - prime(2^n).
%F a(n) = A033844(n+1) - A033844(n). - _Jinyuan Wang_, Nov 14 2020
%t Table[Prime[2^(n + 1)] - Prime[2^n], {n, 0, 40}]
%t #[[2]]-#[[1]]&/@Partition[Prime[2^Range[0,30]],2,1] (* _Harvey P. Dale_, Feb 21 2015 *)
%o (PARI) a(n) = prime(2^(n + 1)) - prime(2^n); \\ _Michel Marcus_, Nov 15 2020
%Y Cf. A000040, A033844, A135371.
%K nonn
%O 0,2
%A _Marvin Ray Burns_, Dec 09 2007
%E a(29)-a(31) from _Jinyuan Wang_, Nov 14 2020
|
