This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A317873 #39 Jul 27 2025 12:47:24 %S A317873 1,1,1,2,8,37,217,1518,12138,109238,1092378,12016155,144193850, %T A317873 1874520045,26243280622,393649209329,6298387349264,107072584937472, %U A317873 1927306528874488,36618824048615255,732376480972305082,15379906100418406713,338357934209204947674 %N A317873 Number of digits in 2^(n!). %C A317873 The old definition (which did not match the data) was "Number of digits in the numerators of partial sums for Liouville's constant, read as base-2 (binary) numbers (A145572)." %H A317873 Kevin Ryde, <a href="/A317873/b317873.txt">Table of n, a(n) for n = 0..300</a> %F A317873 a(n) = A034887(n!). %p A317873 Digits := 900: # for n <= 300 %p A317873 a := n -> ceil(exp(lnGAMMA(n + 1))*log10(2)): %p A317873 seq(a(n), n = 0..30); # _Peter Luschny_, Apr 18 2024 %t A317873 Array[ Floor[#! Log10@2 + 1] &, 22] %Y A317873 Cf. A000142, A034887, A050923, A055642, A145572. %K A317873 nonn,base %O A317873 0,4 %A A317873 _Wolfdieter Lang_ and _Robert G. Wilson v_, Aug 09 2018 %E A317873 Better definition suggested by _Martin Renner_, Mar 24 2024 %E A317873 a(0)=1 prepended by _Alois P. Heinz_, Jul 27 2025