A393278 Row 4 of A330942.

1, 1, 161, 116681, 231522891, 975712562347, 7505272434552891, 95277759368679322731, 1857880156832803930989761, 52733838935186721300080099801, 2089567503476148113065311199746253, 111791087133977183763608463108036229701, 7857307594881145913087205140369622059098111

Offset

0,3

Links

Table of n, a(n) for n=0..12.

Formula

a(n) ~ 2^(5*n - 3/2) * n^(3*n) / (3^n * exp(3*n) * log(2)^(4*n+1)).

For n > 0, a(n) = Sum_{j=0..4*n} (binomial(binomial(j,4) + n - 1, n) * Sum_{i=j..4*n} (-1)^(i-j)*binomial(i,j)).

Mathematica

Join[{1}, Table[Sum[Binomial[Binomial[j, 4] + n - 1, n] Sum[(-1)^(i-j)*Binomial[i, j], {i, j, 4*n}], {j, 0, 4*n}], {n, 1, 15}]]

Crossrefs

Cf. A330942.

Sequence in context: A203334 A272355 A278891 * A232294 A203053 A232367

Adjacent sequences: A393275 A393276 A393277 * A393279 A393280 A393281

Keyword

nonn

Author

Vaclav Kotesovec, Feb 08 2026

Status

approved