A050923
a(n) = 2^(n!).
Original entry on oeis.org
2, 2, 4, 64, 16777216, 1329227995784915872903807060280344576
Offset: 0
Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Dec 30 1999
-
[2^Factorial(n): n in [0..8]]; // Vincenzo Librandi, Dec 16 2012
-
a=2;lst={};Do[a=a^n;AppendTo[lst,a],{n,1,7}];lst (* Vladimir Joseph Stephan Orlovsky, May 26 2009 *)
Table[2^n!,{n,0,9}] (* Vincenzo Librandi, Dec 16 2012 *)
-
makelist(2^(n!),n,0,5); /* Martin Ettl, Dec 27 2012 */
-
a(n)=2^n! \\ Charles R Greathouse IV, Aug 16 2017
A145572
Numerators of partial sums for Liouville's constant, read as base 2 (binary) numbers.
Original entry on oeis.org
1, 3, 49, 12845057, 1017690263500988729456314874071089153, 4222921592695952872362526736376161058920018764920519780147745963811744865992371113095993596088044297100172572224585271942341064532181870606866447799704872724575357044373908131956500952542608981420222196042850818326529
Offset: 1
a(3)=49, because A145571(3)=110001, and the binary number 110001 translates to 2^5+2^4+2^0=32+16+1 = 49.
-
a[n_] := FromDigits[RealDigits[Sum[1/10^k!, {k, n}], 10, n!][[1]], 2]; Array[a, 6] (* Robert G. Wilson v, Aug 08 2018 *)
Block[{k = 0}, NestList[#*2^(++k*k!) + 1 &, 1, 5]] (* Paolo Xausa, Jun 27 2024 *)
A385949
Number of digits in 7^(n!).
Original entry on oeis.org
1, 1, 2, 6, 21, 102, 609, 4260, 34075, 306670, 3066692, 33733610, 404803314, 5262443074, 73674203025, 1105113045374, 17681808725979, 300590748341642, 5410633470149548, 102802035932841396, 2056040718656827910, 43176855091793386107, 949890812019454494354
Offset: 0
Showing 1-3 of 3 results.
Comments