OFFSET
0,1
LINKS
Eric W. Weisstein, Mathworld: Factorial
Eric W. Weisstein, Mathworld: Superfactorial
Wikipedia, Factorial
EXAMPLE
SF(4) = 4!*3!*2!*1! = 288, and 5! < 288 < 6! so a(4)=6.
MATHEMATICA
a[n_] := Block[{ff = Product[k!, {k, n}], k = 1}, While[k! <= ff, k++]; k]; Table[a[n], {n, 0, 60}] (* Giovanni Resta, Mar 18 2013 *)
PROG
(JavaScript)
function factorial(n) {
var i, c=1;
for (i=2; i<=n; i++) c*=i;
return c;
}
k=1;
m=1;
for (i=2; i<30; i++) {
k*=factorial(i);
while (factorial(m)<=k) m++;
document.write(m+", ");
}
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon Perry, Mar 17 2013
EXTENSIONS
a(27)-a(56) from Giovanni Resta, Mar 18 2013
STATUS
approved