|
1, 2, 2, 6, 2, 72, 2, 54, 12, 216, 2, 9720, 2, 120, 432, 810, 2, 64800, 2, 262440, 240, 1080, 2, 32805000, 36, 600, 360, 243000, 2, 28343520000, 2, 182250, 2160, 5400, 720, 27337500000, 2, 3000, 1200, 13286025000, 2, 72900000000, 2, 32805000, 11664000, 27000, 2, 69198046875000, 20, 218700000, 10800, 30375000, 2, 911250000000, 6480, 184528125000, 6000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A329380(n) = { my(m=1); fordiv(n, d, m *= A276086(d)^omega(n/d)); (m); };
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|