A119636 a(n) = lcm(1,...,2n+4)/((n+1)*binomial(2n+2, n+1)).
6, 5, 14, 9, 22, 65, 30, 119, 532, 126, 690, 825, 594, 4147, 62062, 15015, 3640, 32708, 7956, 79458, 833340, 203490, 2337874, 4004231, 980628, 12738550, 3124550, 766935, 11113830, 166613265, 81940950
Offset: 0
Links
- Muniru A Asiru, Table of n, a(n) for n = 0..3000
Crossrefs
Cf. A068553.
Programs
-
GAP
List([0..40],n->Lcm(List([1..2*n+4]))/((n+1)*Binomial(2*n+2,n+1))); # Muniru A Asiru, Mar 04 2019
-
Magma
[Lcm([1..2*n+4])/((n+1)*Binomial(2*n+2, n+1)): n in [0..40]]; // G. C. Greubel, Mar 04 2019
-
Mathematica
Table[LCM@@Range[2n+4]/((n+1)Binomial[2n+2,n+1]),{n,0,30}] (* Harvey P. Dale, Jun 08 2018 *)
-
Sage
[lcm(range(1, 2*(n+2)+1))/((n+1)*binomial(2*n+2, n+1)) for n in (0..40)] # G. C. Greubel, Mar 04 2019
Comments