A363696 Expansion of Sum_{k>0} (1/(1-x^k)^6 - 1).

6, 27, 62, 153, 258, 545, 798, 1440, 2064, 3282, 4374, 6859, 8574, 12447, 15818, 21789, 26340, 36196, 42510, 56538, 66634, 85125, 98286, 126901, 142764, 178506, 203440, 249909, 278262, 343936, 376998, 457686, 506372, 602118, 659058, 791908, 850674, 1005129, 1094638

Offset

1,1

Links

Seiichi Manyama, Table of n, a(n) for n = 1..10000

Formula

G.f.: Sum_{k>0} binomial(k+5,5) * x^k/(1 - x^k).

a(n) = Sum_{d|n} binomial(d+5,5).

Mathematica

a[n_] := DivisorSum[n, Binomial[# + 5, 5] &]; Array[a, 40] (* Amiram Eldar, Jul 05 2023 *)

Prog

(PARI) a(n) = sumdiv(n, d, binomial(d+5, 5));

Crossrefs

Cf. A007503, A116963, A363628, A363695.

Cf. A101289, A363606.

Sequence in context: A012720 A012365 A217189 * A167469 A190623 A305158

Adjacent sequences: A363693 A363694 A363695 * A363697 A363698 A363699

Keyword

nonn,easy

Author

Seiichi Manyama, Jun 16 2023

Status

approved