A076100 Least common multiple of n numbers starting with n.
1, 6, 60, 420, 2520, 27720, 360360, 360360, 12252240, 232792560, 232792560, 5354228880, 26771144400, 80313433200, 2329089562800, 72201776446800, 144403552893600, 144403552893600, 5342931457063200, 5342931457063200
Offset: 1
Keywords
Examples
a(4) = lcm(4,5,6,7) = 420.
Crossrefs
Bisection of A003418.
Programs
-
Mathematica
Table[ Apply[LCM, Table[i, {i, n, 2n - 1}]], {n, 1, 20}]
-
PARI
a(n) = lcm(vector(n, k, n+k-1)); \\ Michel Marcus, Mar 18 2018
Extensions
Edited and extended by Robert G. Wilson v, Oct 10 2002