login
A066026
a(n) = ceiling(log(n!)).
1
0, 1, 2, 4, 5, 7, 9, 11, 13, 16, 18, 20, 23, 26, 28, 31, 34, 37, 40, 43, 46, 49, 52, 55, 59, 62, 65, 68, 72, 75, 79, 82, 86, 89, 93, 96, 100, 103, 107, 111, 115, 118, 122, 126, 130, 133, 137, 141, 145, 149, 153, 157, 161, 165, 169, 173, 177, 181, 185, 189, 193, 197, 202
OFFSET
1,3
LINKS
MATHEMATICA
Ceiling[Log[Range[70]!]] (* Harvey P. Dale, Jul 23 2012 *)
PROG
(PARI) { for (n=1, 1000, a=ceil(log(n!)); write("b066026.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 07 2009
(PARI) a(n) = ceil(lngamma(n+1)) \\ Michel Marcus, Jun 29 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert A. Stump (bee_ess107(AT)yahoo.com), Dec 11 2001
EXTENSIONS
Terms a(51)-a(63) from Harry J. Smith, Nov 07 2009
STATUS
approved