A390391 a(n) = Sum_{k=0..n} binomial(n+7*k+7,k).

1, 16, 270, 4789, 87530, 1631130, 30809605, 587764866, 11298879823, 218519689068, 4246920072270, 82874131725941, 1622728110817423, 31866659914813562, 627362088662651587, 12378018884466847098, 244692479773713839038, 4845423038104636688552

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..760

Formula

G.f.: g^7/((1-8*x*g^7) * (1-x*g)) where g = 1+x*g^8 is the g.f. of A007556.

Mathematica

Table[Sum[Binomial[n+7*k+7, k], {k, 0, n}], {n, 0, 20}] (* Vincenzo Librandi, Nov 07 2025 *)

Prog

(PARI) a(n) = sum(k=0, n, binomial(n+7*k+7, k));

Crossrefs

Cf. A007556, A376447, A390387.

Sequence in context: A218062 A220757 A395669 * A166908 A221089 A119290

Adjacent sequences: A390388 A390389 A390390 * A390392 A390393 A390394

Keyword

nonn

Author

Seiichi Manyama, Nov 03 2025

Status

approved