%I #20 Sep 20 2019 03:54:17

%S 1,-47,505,-2415,9661,-23735,-33487,237201,-163277,-454067,1069225,

%T -1219575,-1155475,1573889,4878805,323217,-13811867,7674019,21322841,

%U -23331315,-16910935,-50253575,37286545,119786505

%N Dirichlet convolution of [ 1,1,1,... ] with A034778.

%C Multiplicative because both A000012 and A034778 are. - _Christian G. Bower_, May 16 2005

%t b[n_] := DivisorSum[n, RamanujanTau[#] RamanujanTau[n/#]&];

%t a[n_] := DivisorSum[n, b];

%t a /@ Range[1, 24] (* _Jean-François Alcover_, Sep 20 2019 *)

%o (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

%Y Cf. A000012, A034778.

%K sign,mult

%O 1,2

%A _N. J. A. Sloane_

%E Offset corrected by _Andrew Howroyd_, Feb 11 2018