1,3

omega(x!) is the number of primes <= x.

Table of n, a(n) for n=1..52.

omega(x): number of distinct prime divisors of x. bigomega(x): number of prime divisors of x, counted with multiplicity.

PrimeNu[#]PrimeOmega[#]&/@(Range[60]!) (* Harvey P. Dale, Aug 14 2013 *)

(PARI) omegafactxbigomegafact(n) = { local(x); for(x=1, n, print1(omega(x!)*bigomega(x!)", ") ) }

Sequence in context: A312753 A071422 A212538 * A024916 A212539 A102216

Adjacent sequences: A113899 A113900 A113901 * A113903 A113904 A113905

easy,nonn

Cino Hilliard, Jan 29 2006

approved