cp's OEIS Frontend

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.

A363652 Expansion of Sum_{k>0} x^(3*k)/(1 - (k*x)^k)^3.

This page as a plain text file.
%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