%I #8 Aug 20 2023 10:51:04
%S 1,9,16,89,36,504,64,2193,1474,5544,144,56024,196,84912,83376,674257,
%T 324,2833128,400,10842624,3764224,25404696,576,283622136,1913486,
%U 436839984,243868120,2955876880,900,13385040624,1024,57008721777,9290026080,126014768064,338361024
%N a(n) = Sum_{d|n} C(n,d)*sigma(d)*sigma(n/d).
%C Logarithmic derivative of A179306.
%t a[n_] := DivisorSum[n, Binomial[n, #] * DivisorSigma[1, #] * DivisorSigma[1, n/#] &]; Array[a, 35] (* _Amiram Eldar_, Aug 18 2023 *)
%o (PARI) {a(n)=sumdiv(n,d,binomial(n,d)*sigma(d)*sigma(n/d))}
%Y Cf. A000203, A179306.
%K nonn
%O 1,2
%A _Paul D. Hanna_, Jul 10 2010
%E a(33)-a(35) from _Amiram Eldar_, Aug 18 2023