OFFSET
0,4
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..200
FORMULA
EXAMPLE
a(3) = 3 because 3^3! = 729 with 3 digits;
a(4) = 15 because 4^4! = 281474976710656 with 15 digits.
MAPLE
a:= proc(n) local h;
Digits:= 1000;
1+ `if`(n=0, 0, floor(n!*simplify(log[10](n))))
end:
seq(a(n), n=0..30); # Alois P. Heinz, Dec 17 2011
MATHEMATICA
Table[IntegerLength[n^n!], {n, 0, 10}] (* The program generates the first 11 terms of the sequence. *) (* Harvey P. Dale, Nov 19 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jacques ALARDET, Dec 17 2011
EXTENSIONS
More terms from Alois P. Heinz, Dec 17 2011
STATUS
approved