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

%I #6 Apr 26 2017 02:49:12

%S 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,

%T 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,

%U 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

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

%H G. C. Greubel, <a href="/A144494/b144494.txt">Table of n, a(n) for n = 1..5000</a>

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

%t Table[If[PrimeQ[n], 0, PrimeOmega[n]], {n,1,100}] (* _G. C. Greubel_, Apr 25 2017 *)

%Y Cf. A001221, A001222, A087624, A055636.

%K nonn

%O 1,4

%A _N. J. A. Sloane_, Dec 12 2008