|
| |
|
|
A066921
|
|
a(n) = lcm(Omega(n), omega(n)).
|
|
1
|
|
|
|
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, 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, 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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,4
|
|
|
LINKS
|
Harry J. Smith, Table of n, a(n) for n = 1..1000
|
|
|
EXAMPLE
|
a(32) = 5 because Omega(32) = 5, omega(32) = 1, and lcm(5, 1) = 5.
a(33) = 2 because Omega(33) = 2, omega(33) = 2.
|
|
|
MATHEMATICA
|
Table[LCM[PrimeOmega[n], PrimeNu[n]], {n, 100}] (* Alonso del Arte, Dec 25 2015 *)
|
|
|
PROG
|
(PARI) { for (n=1, 1000, write("b066921.txt", n, " ", lcm(bigomega(n), omega(n))) ) } \\ Harry J. Smith, Apr 06 2010
|
|
|
CROSSREFS
|
Cf. A066922.
Sequence in context: A050379 A344589 A153024 * A076649 A157235 A086289
Adjacent sequences: A066918 A066919 A066920 * A066922 A066923 A066924
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Benoit Cloitre, Jan 23 2002
|
|
|
STATUS
|
approved
|
| |
|
|
