OFFSET
0,4
COMMENTS
Sum of reciprocals converge to 3.317087986755007857557474300.. I found getting the 3 starting 1's interesting. 6 sequences begin with 1,1,1,4,16 and none begin with omegafactpowbigomegafact(n) = 1,1,1,4,16,243.
FORMULA
omega(x): number of distinct prime divisors of x. bigomega(x): number of prime divisors of x, counted with multiplicity.
MATHEMATICA
Join[{1, 1}, PrimeNu[#]^PrimeOmega[#]&/@(Range[2, 20]!)] (* Harvey P. Dale, Aug 07 2022 *)
PROG
(PARI) omegafactpowbigomegafact(n) = { local(x, a, b, s); s=0; for(x=0, n, a=omega(x!); b=bigomega(x!); s+=1./a^b; print1(a^b", "); ); print(); print(s) }
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Jan 29 2006
STATUS
approved