A034779 Dirichlet convolution of [ 1,1,1,... ] with A034778.

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

Links

Table of n, a(n) for n=1..24.

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

Cf. A000012, A034778.

Sequence in context: A012149 A106104 A009086 * A201090 A293368 A116146

Adjacent sequences: A034776 A034777 A034778 * A034780 A034781 A034782

Keyword

sign,mult

Author

N. J. A. Sloane

Extensions

Offset corrected by Andrew Howroyd, Feb 11 2018

Status

approved