A130675 Factorial of bigomega(n).

1, 1, 1, 2, 1, 2, 1, 6, 2, 2, 1, 6, 1, 2, 2, 24, 1, 6, 1, 6, 2, 2, 1, 24, 2, 2, 6, 6, 1, 6, 1, 120, 2, 2, 2, 24, 1, 2, 2, 24, 1, 6, 1, 6, 6, 2, 1, 120, 2, 6, 2, 6, 1, 24, 2, 24, 2, 2, 1, 24, 1, 2, 6, 720, 2, 6, 1, 6, 2, 6, 1, 120, 1, 2, 6, 6, 2, 6, 1, 120, 24, 2, 1, 24, 2, 2, 2, 24, 1, 24

Offset: 1

Author

Giovanni Teofilatto, Aug 12 2007

Keywords

• nonn
• easy

Comments

a(n) = 1 iff n=1 or n is prime. - Wesley Ivan Hurt, Jun 05 2014

Links

• Antti Karttunen, Table of n, a(n) for n = 1..10000
• Index entries for sequences computed from exponents in factorization of n.

Crossrefs

Cf. A000142, A001222, A008480, A086568, A112624.

Programs

Mathematica

PrimeOmega[Range[90]]! (* Harvey P. Dale, Nov 14 2011 *)

PARI

A130675(n) = bigomega(n)! \\ Antti Karttunen, Jul 07 2017

Formula

a(n) = A000142(A001222(n)).

a(n) = A008480(n) * A112624(n). - Amiram Eldar, Mar 08 2024

Extensions

A 16 split into 1,6, a 21 split into 2,1, a(1) replaced by 1, and definition clarified by R. J. Mathar, Aug 23 2010