|
1, 4, 7, 8, 12, 28, 15, 24, 14, 48, 28, 56, 24, 60, 84, 32, 39, 56, 42, 96, 105, 112, 60, 168, 32, 96, 90, 120, 72, 336, 63, 104, 196, 156, 180, 112, 60, 168, 168, 288, 96, 420, 84, 224, 168, 240, 124, 224, 80, 128, 273, 192, 120, 360, 336, 360, 294, 288, 168, 672, 96, 252, 210, 128, 288, 784, 126, 312, 420, 720
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Product_{p^e||n} sigma(sigma(p^e)), where n = Product_{p^e||n}, with each p^e the maximal power of prime p that divides n.
|
|
PROG
|
(PARI)
A353802(n) = { my(f = factor(n)); prod(k=1, #f~, A051027(f[k, 1]^f[k, 2])); };
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,mult
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|