|
Search: id:A066574
|
|
|
| A066574 |
|
LCM of numbers <= n and having a factor in common with n. |
|
+0
2
|
|
| 1, 2, 3, 4, 5, 12, 7, 24, 18, 120, 11, 360, 13, 840, 180, 1680, 17, 5040, 19, 5040, 1260, 55440, 23, 55440, 300, 720720, 7560, 720720, 29, 10810800, 31, 1441440, 83160, 24504480, 2100, 73513440, 37, 465585120, 1081080, 2327925600, 41, 1396755360
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
If n is not composite then a(n) = n.
|
|
EXAMPLE
|
a(6) = 12 since lcm{ 1,2,3,4,6 } = 12.
|
|
MATHEMATICA
|
f[n_] := Block[{a = 1, k = 2}, While[k < n + 1, If[ GCD[k, n] > 1, a = LCM[a, k]]; k++ ]; Return[a]]; Table[ f[n], {n, 1, 45} ]
|
|
CROSSREFS
|
Sequence in context: A052106 A064446 A143482 this_sequence A039007 A050745 A077375
Adjacent sequences: A066571 A066572 A066573 this_sequence A066575 A066576 A066577
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Dec 19 2001
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 26 2001
|
|
|
Search completed in 0.002 seconds
|
