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,4

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.

Formula

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

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

Mathematica

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

Prog

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

Crossrefs

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

Sequence in context: A186726 A205405 A112623 * A319118 A163820 A284465

Adjacent sequences: A130672 A130673 A130674 * A130676 A130677 A130678

Keyword

nonn,easy

Author

Giovanni Teofilatto, Aug 12 2007

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

Status

approved