A144494 a(n) = 0 if n is prime, otherwise A001222(n).

0, 0, 0, 2, 0, 2, 0, 3, 2, 2, 0, 3, 0, 2, 2, 4, 0, 3, 0, 3, 2, 2, 0, 4, 2, 2, 3, 3, 0, 3, 0, 5, 2, 2, 2, 4, 0, 2, 2, 4, 0, 3, 0, 3, 3, 2, 0, 5, 2, 3, 2, 3, 0, 4, 2, 4, 2, 2, 0, 4, 0, 2, 3, 6, 2, 3, 0, 3, 2, 3, 0, 5, 0, 2, 3, 3, 2, 3, 0, 5, 4, 2, 0, 4, 2, 2, 2, 4, 0, 4, 2, 3, 2, 2, 2, 6, 0, 3, 3, 4, 0, 3, 0, 4, 3

Offset

1,4

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Maple

with(numtheory); f:=n->if isprime(n) then 0 else bigomega(n); fi;

Mathematica

Table[If[PrimeQ[n], 0, PrimeOmega[n]], {n, 1, 100}] (* G. C. Greubel, Apr 25 2017 *)

Crossrefs

Cf. A001221, A001222, A087624, A055636.

Sequence in context: A153585 A169611 A242460 * A136166 A259525 A319071

Adjacent sequences: A144491 A144492 A144493 * A144495 A144496 A144497

Keyword

nonn

Author

N. J. A. Sloane, Dec 12 2008

Status

approved