A072639 a(0) = 0, a(n) = Sum_{i=0..n-1} 2^((2^i)-1).
0, 1, 3, 11, 139, 32907, 2147516555, 9223372039002292363, 170141183460469231740910675754886398091, 57896044618658097711785492504343953926805133516280751251469702679711451218059
Offset: 0
Keywords
Crossrefs
Programs
-
Maple
A072639 := proc(n) local i; add(2^((2^i)-1),i=0..(n-1)); end;
-
Mathematica
a[n_] := Sum[2^(2^i - 1), {i, 0, n - 1}]; Table[a[n], {n, 0, 9}] (* Jean-François Alcover, Mar 06 2016 *)
-
PARI
a(n) = if (n, sum(i=0, n-1, 2^((2^i)-1)), 0); \\ Michel Marcus, Mar 06 2016
Comments