login
A362988
a(n) = lcm({i, i = 1..n}) / Product_{2 <= p < n, p prime} p.
1
1, 1, 2, 3, 2, 10, 2, 14, 4, 12, 12, 132, 12, 156, 12, 12, 24, 408, 24, 456, 24, 24, 24, 552, 24, 120, 120, 360, 360, 10440, 360, 11160, 720, 720, 720, 720, 720, 26640, 720, 720, 720, 29520, 720, 30960, 720, 720, 720, 33840, 720, 5040, 5040, 5040, 5040, 267120
OFFSET
0,3
EXAMPLE
a(8) = 2^2;
a(9) = 2^2 * 3;
a(10) = 2^2 * 3;
a(11) = 2^2 * 3 * 11;
a(12) = 2^2 * 3;
a(13) = 2^2 * 3 * 13;
MAPLE
A362988 := n -> ilcm(seq(i, i = 1..n)) / mul(k, k = select(isprime, [$2..n-1])):
seq(A362988(n), n = 0..53);
CROSSREFS
Cf. A003418 (lcm), A034386 (primorial).
Sequence in context: A359427 A336246 A351251 * A126286 A126288 A205393
KEYWORD
nonn
AUTHOR
Peter Luschny, May 14 2023
STATUS
approved