login
A034779
Dirichlet convolution of [ 1,1,1,... ] with A034778.
0
1, -47, 505, -2415, 9661, -23735, -33487, 237201, -163277, -454067, 1069225, -1219575, -1155475, 1573889, 4878805, 323217, -13811867, 7674019, 21322841, -23331315, -16910935, -50253575, 37286545, 119786505
OFFSET
1,2
COMMENTS
Multiplicative because both A000012 and A034778 are. - Christian G. Bower, May 16 2005
MATHEMATICA
b[n_] := DivisorSum[n, RamanujanTau[#] RamanujanTau[n/#]&];
a[n_] := DivisorSum[n, b];
a /@ Range[1, 24] (* Jean-François Alcover, Sep 20 2019 *)
PROG
(PARI) seq(n)={my(v=Vec(eta(x + O(x^n))^24)); dirmul(dirmul(v, v), vector(#v, n, 1))} \\ Andrew Howroyd, Feb 12 2018
CROSSREFS
Sequence in context: A012149 A106104 A009086 * A201090 A293368 A116146
KEYWORD
sign,mult
EXTENSIONS
Offset corrected by Andrew Howroyd, Feb 11 2018
STATUS
approved