A119634 a(n) = lcm(1,...,2n+2)/2.

1, 6, 30, 420, 1260, 13860, 180180, 360360, 6126120, 116396280, 116396280, 2677114440, 13385572200, 40156716600, 1164544781400, 72201776446800, 72201776446800, 72201776446800, 2671465728531600, 2671465728531600

Offset: 0

Author

Paul Barry, Jun 09 2006

Keywords

• nonn

Links

• Vaclav Kotesovec, Table of n, a(n) for n = 0..1000
• Vaclav Kotesovec, Plot of log(a(n))/n for n = 1..10000

Crossrefs

Cf. A003418.

Column k=0 of A120101.

Programs

GAP

List([0..20],n->Lcm(List([1..2*n+2]))/2); # Muniru A Asiru, Mar 04 2019

Magma

[LCM([1..2*n+2])/2: n in [0..20]]; // G. C. Greubel, Mar 05 2019

Mathematica

Table[LCM @@ Range[2*n + 2]/2, {n, 0, 20}] (* Vaclav Kotesovec, Mar 04 2019 *)

PARI

{a(n) = lcm(vector(2*n+2, i, i))/2}; \\ G. C. Greubel, Mar 05 2019

Sage

[lcm(range(1,2*n+3))/2 for n in (0..20)] # G. C. Greubel, Mar 05 2019