|
|
A362989
|
|
a(n) = lcm({i + 1, i = 0..n}) / Product_{d | n, d + 1 prime} d.
|
|
1
|
|
|
1, 1, 1, 6, 2, 30, 10, 420, 84, 1260, 420, 13860, 132, 180180, 60060, 360360, 24024, 6126120, 291720, 116396280, 705432, 116396280, 38798760, 2677114440, 9806280, 13385572200, 13385572200, 40156716600, 2677114440, 1164544781400, 5041319400, 72201776446800
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
MAPLE
|
LCM := n -> ilcm(seq(i + 1, i = 0..n)):
Clausen := n -> if n = 0 then 1 else
mul(i, i = select(isprime, map(i -> i+1, NumberTheory:-Divisors(n)))) fi:
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|