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 A202336 #22 Nov 19 2024 16:49:44
%S A202336 1,1,1,3,15,84,561,4260,36413,346276,3628801,41569064,516929544,
%T A202336 6936548425,99917483647,1537944393896,25193549397053,437655212248536,
%U A202336 8036723680196724,155554110186062367,3165278489148945082,67553429525569109411,1508884070229326953381
%N A202336 Number of digits in n^(n!).
%H A202336 Alois P. Heinz, <a href="/A202336/b202336.txt">Table of n, a(n) for n = 0..200</a>
%F A202336 a(n) = A055642(A053986(n)). - _Michel Marcus_, Aug 22 2013
%e A202336 a(3) = 3 because 3^3! = 729 with 3 digits;
%e A202336 a(4) = 15 because 4^4! = 281474976710656 with 15 digits.
%p A202336 a:= proc(n) local h;
%p A202336 Digits:= 1000;
%p A202336 1+ `if`(n=0, 0, floor(n!*simplify(log[10](n))))
%p A202336 end:
%p A202336 seq(a(n), n=0..30); # _Alois P. Heinz_, Dec 17 2011
%t A202336 Table[IntegerLength[n^n!],{n,0,10}] (* The program generates the first 11 terms of the sequence. *) (* _Harvey P. Dale_, Nov 19 2024 *)
%Y A202336 Cf. A053986, A202358.
%K A202336 nonn,base
%O A202336 0,4
%A A202336 _Jacques ALARDET_, Dec 17 2011
%E A202336 More terms from _Alois P. Heinz_, Dec 17 2011