OFFSET
1,3
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..1000
EXAMPLE
a(5) = 3 because (4^2)*2! < 5! <= (4^3)*3!.
MAPLE
A213855 := proc(n)
for m from 1 do
if (4^m)*m! >= n! then
return m;
end if;
end do:
end proc: # R. J. Mathar, Jul 18 2012
MATHEMATICA
Table[m=1; While[n!>(4^m)*m!, m++]; m, {n, 1, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jul 17 2012
STATUS
approved