|
%I #13 Jul 02 2014 00:46:24
%S 4,24,96,1920,6144,122880,393216,7864320,528482304,1610612736,
%T 135291469824,2061584302080,6597069766656,131941395333120,
%U 8866461766385664,567453553048682496,1729382256910270464,145268109580462718976,2213609288845146193920
%N First differences of Mersenne numbers A001348.
%C Also, first differences of 2^prime(n) = A034785(n). - _Wesley Ivan Hurt_, Jul 02 2014
%H Felix Fröhlich, <a href="/A139238/b139238.txt">Table of n, a(n) for n = 1..59</a>
%F a(n) = A001348(n+1) - A001348(n).
%F a(n) = A034785(n+1) - A034785(n). - _Wesley Ivan Hurt_, Jul 02 2014
%e a(2)=24 because A001348(2)=7 and A001348(2+1)=31 then 31-7 = 24.
%p A139238:=n->2^ithprime(n+1)-2^ithprime(n): seq(A139238(n), n=1..20); # _Wesley Ivan Hurt_, Jul 02 2014
%t Table[2^Prime[n + 1] - 2^Prime[n], {n, 20}] (* _Wesley Ivan Hurt_, Jul 02 2014 *)
%o (PARI) for(n=1, 20, d=2^prime(n+1)-2^prime(n); print1(d, ", ")) \\ _Felix Fröhlich_, Jun 30 2014
%Y Cf. A001348, A139228, A139231, A139234, A139239, A139240, A139241, A139242, A139243.
%Y Cf. A034785.
%K easy,nonn
%O 1,1
%A _Omar E. Pol_, Apr 19 2008
%E a(10)-a(19) from _Felix Fröhlich_, Jun 30 2014
|
