|
|
A319708
|
|
a(n) = Product_{d|n, d<n} A276086(d).
|
|
4
|
|
|
1, 2, 2, 6, 2, 36, 2, 54, 12, 108, 2, 1620, 2, 60, 216, 810, 2, 5400, 2, 43740, 120, 540, 2, 607500, 36, 300, 360, 40500, 2, 21870000, 2, 182250, 1080, 2700, 360, 151875000, 2, 1500, 600, 246037500, 2, 101250000, 2, 5467500, 972000, 13500, 2, 85429687500, 20, 6075000, 5400, 5062500, 2, 2531250000, 3240, 3417187500, 3000, 67500, 2
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Product_{d|n, d<n} A276086(d).
For all n >= 1:
|
|
PROG
|
(PARI)
A276086(n) = { my(i=0, m=1, pr=1, nextpr); while((n>0), i=i+1; nextpr = prime(i)*pr; if((n%nextpr), m*=(prime(i)^((n%nextpr)/pr)); n-=(n%nextpr)); pr=nextpr); m; };
A319708(n) = { my(m=1); fordiv(n, d, if(d<n, m *= A276086(d))); (m); };
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|