A099795 Least common multiple of 1, 2, 3, ..., prime(n)-1.

1, 2, 12, 60, 2520, 27720, 720720, 12252240, 232792560, 80313433200, 2329089562800, 144403552893600, 5342931457063200, 219060189739591200, 9419588158802421600, 3099044504245996706400, 164249358725037825439200, 9690712164777231700912800

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..342

Formula

a(n) = (A094998(n)-1) / A099796(n).

a(n) = A038610(A000040(n)). - Anthony Browne, Jul 19 2016

Maple

Primes:= select(isprime, [2, $3..100]):
seq(ilcm($2..Primes[i]-1), i=1..nops(Primes)); # Robert Israel, Jul 19 2016

Mathematica

LCM@@Range[#]&/@(Prime[Range[20]]-1) (* Harvey P. Dale, Jan 30 2015 *)

Prog

(Magma) [Lcm([2..p-1]): p in PrimesUpTo(70)]; // Bruno Berselli, Feb 06 2015

Crossrefs

Cf. A094998, A099794, A099796, A038610, A000040.

Sequence in context: A082688 A099996 A352881 * A358448 A127044 A245091

Adjacent sequences: A099792 A099793 A099794 * A099796 A099797 A099798

Keyword

nonn

Author

Ray Chandler, Oct 29 2004

Extensions

a(18) from Bruno Berselli, Feb 06 2015

Status

approved