This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A343546 #13 Apr 25 2021 02:22:34 %S A343546 1,8,24,72,131,318,469,936,1359,2294,3014,5172,6201,9548,12126,17376, %T A343546 20366,29862,33668,47372,54684,71874,80753,111000,119410,154986, %U A343546 173988,220864,237365,309864,324663,411744,445170,542776,578984,731340,749435,918118,981474 %N A343546 a(n) = n * Sum_{d|n} binomial(d+4,5)/d. %F A343546 G.f.: Sum_{k>=1} k * x^k/(1 - x^k)^6 = Sum_{k>=1} binomial(k+4,5) * x^k/(1 - x^k)^2. %t A343546 a[n_] := n * DivisorSum[n, Binomial[# + 4, 5]/# &]; Array[a, 40] (* _Amiram Eldar_, Apr 25 2021 *) %o A343546 (PARI) a(n) = n*sumdiv(n, d, binomial(d+4, 5)/d); %o A343546 (PARI) my(N=40, x='x+O('x^N)); Vec(sum(k=1, N, binomial(k+4, 5)*x^k/(1-x^k)^2)) %Y A343546 Cf. A000203, A038040, A101289, A309731, A343544, A343545, A343547. %K A343546 nonn %O A343546 1,2 %A A343546 _Seiichi Manyama_, Apr 19 2021