login
a(n) = lcm(Omega(n), omega(n)).
1

%I #17 Dec 25 2015 21:41:41

%S 0,1,1,2,1,2,1,3,2,2,1,6,1,2,2,4,1,6,1,6,2,2,1,4,2,2,3,6,1,3,1,5,2,2,

%T 2,4,1,2,2,4,1,3,1,6,6,2,1,10,2,6,2,6,1,4,2,4,2,2,1,12,1,2,6,6,2,3,1,

%U 6,2,3,1,10,1,2,6,6,2,3,1,10,4,2,1,12,2,2,2,4,1,12,2,6,2,2,2,6,1,6,6,4,1,3

%N a(n) = lcm(Omega(n), omega(n)).

%H Harry J. Smith, <a href="/A066921/b066921.txt">Table of n, a(n) for n = 1..1000</a>

%e a(32) = 5 because Omega(32) = 5, omega(32) = 1, and lcm(5, 1) = 5.

%e a(33) = 2 because Omega(33) = 2, omega(33) = 2.

%t Table[LCM[PrimeOmega[n], PrimeNu[n]], {n, 100}] (* _Alonso del Arte_, Dec 25 2015 *)

%o (PARI) { for (n=1, 1000, write("b066921.txt", n, " ", lcm(bigomega(n),omega(n))) ) } \\ _Harry J. Smith_, Apr 06 2010

%Y Cf. A066922.

%K nonn

%O 1,4

%A _Benoit Cloitre_, Jan 23 2002