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 A363652 #12 Jul 19 2023 02:19:36 %S A363652 0,0,1,3,6,11,15,33,29,132,45,777,66,3918,4466,22377,120,311655,153, %T A363652 992586,7971806,2949330,231,483657349,58594026,69206316,10847774018, %U A363652 64754136132,378,696335917637,435,23096840946129,12709329142142,32212255248,1434580813047030 %N A363652 Expansion of Sum_{k>0} x^(3*k)/(1 - (k*x)^k)^3. %F A363652 a(n) = Sum_{d|n} (n/d)^(n-3*n/d) * binomial(d-1,2). %t A363652 a[n_] := DivisorSum[n, (n/#)^(n - 3*n/#)*Binomial[# - 1, 2] &]; Array[a, 35] (* _Amiram Eldar_, Jul 18 2023 *) %o A363652 (PARI) a(n) = sumdiv(n, d, (n/d)^(n-3*n/d)*binomial(d-1, 2)); %Y A363652 Cf. A363647, A363650, A363651. %Y A363652 Cf. A363644. %K A363652 nonn %O A363652 1,4 %A A363652 _Seiichi Manyama_, Jun 13 2023