[go: up one dir, main page]

login
A321545
a(n) = Sum_{d|n} (-1)^(d-1)*d^6.
3
1, -63, 730, -4159, 15626, -45990, 117650, -266303, 532171, -984438, 1771562, -3036070, 4826810, -7411950, 11406980, -17043519, 24137570, -33526773, 47045882, -64988534, 85884500, -111608406, 148035890, -194401190, 244156251, -304089030, 387952660, -489306350, 594823322, -718639740, 887503682
OFFSET
1,2
FORMULA
G.f.: Sum_{k>=1} (-1)^(k-1)*k^6*x^k/(1 - x^k). - Ilya Gutkovskiy, Dec 23 2018
Multiplicative with a(2^e) = 2 - (2^(6*e + 6) - 1)/63, and a(p^e) = (p^(6*e + 6) - 1)/(p^6 - 1) for p > 2. - Amiram Eldar, Nov 04 2022
MATHEMATICA
f[p_, e_] := (p^(6*e + 6) - 1)/(p^6 - 1); f[2, e_] := 2 - (2^(6*e + 6) - 1)/63; a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; Array[a, 30] (* Amiram Eldar, Nov 04 2022 *)
PROG
(PARI) apply( a(n)=sumdiv(n, d, (-1)^(d-1)*d^6), [1..30]) \\ M. F. Hasler, Nov 26 2018
CROSSREFS
Cf. A321543 - A321565, A321807 - A321836 for similar sequences.
Sequence in context: A123866 A024004 A284927 * A201886 A232794 A091027
KEYWORD
sign,mult
AUTHOR
N. J. A. Sloane, Nov 23 2018
STATUS
approved