A045948 a(n) = A003418(n)/A034386(n).

1, 1, 1, 2, 2, 2, 2, 4, 12, 12, 12, 12, 12, 12, 12, 24, 24, 24, 24, 24, 24, 24, 24, 24, 120, 120, 360, 360, 360, 360, 360, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 720, 5040, 5040, 5040, 5040, 5040, 5040, 5040, 5040, 5040

Offset

1,4

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Index entries for sequences related to lcm's

Example

n=11: lcm(1..11) = 27720 = 8*9*5*7*11 = 2310*12. A034386(11)=2310, so the quotient is 12. Thus a(11) = 12.

Mathematica

Table[Exp[Sum[MangoldtLambda[n], {n, 1, m}]]/ Product[x, {x, Prime[Range[PrimePi[m]]]}], {m, 1, 57}] (* Fred Daniel Kline, Apr 02 2015 *)

Prog

(PARI) a(n)=lcm([1..n])/prod(i=1, primepi(n), prime(i)) \\ Charles R Greathouse IV, Apr 02 2015; corrected by Michel Marcus, Dec 26 2020

Crossrefs

Cf. A003418, A034386, A002110, A000142, A049536, A048148.

Sequence in context: A171869 A147751 A360315 * A278110 A248763 A233585

Adjacent sequences: A045945 A045946 A045947 * A045949 A045950 A045951

Keyword

nonn

Author

Labos Elemer

Status

approved