A376400
a(0) = 1, and for n > 0, a(n) = a(n-1) * A276076(a(n-1)), where A276076 is the factorial base exp-function.
Original entry on oeis.org
1, 2, 6, 30, 1050, 70814493750, 7568077812763134673885891483463343434987134201379042046671543939118568739667281250
Offset: 0
Cf.
A376401 (=
A276075(a(n)), also gives the partial sums from its second term onward).
-
A276076(n) = { my(m=1, p=2, i=2); while(n, m *= (p^(n%i)); n = n\i; p = nextprime(1+p); i++); (m); };
A376400(n) = if(!n,1,my(x=A376400(n-1)); x*A276076(x));
Comments