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 A349313 #13 Nov 15 2021 08:56:38
%S A349313 1,2,16,212,3320,57024,1038928,19718512,385668448,7718866880,
%T A349313 157326086656,3254310606208,68142850580480,1441588339943168,
%U A349313 30765576147680000,661561298256228096,14319744815795062272,311756656998135770112,6822215641015820419072
%N A349313 G.f. A(x) satisfies: A(x) = (1 + x * A(x)^7) / (1 - x).
%H A349313 Seiichi Manyama, <a href="/A349313/b349313.txt">Table of n, a(n) for n = 0..500</a>
%F A349313 a(n) = Sum_{k=0..n} binomial(n+6*k,7*k) * binomial(7*k,k) / (6*k+1).
%F A349313 a(n) = F([(1+n)/6, (2+n)/6, (3+n)/6, (4+n)/6, (5+n)/6, 1+n/6, -n], [1/3, 1/2, 2/3, 5/6, 1, 7/6], -1), where F is the generalized hypergeometric function. - _Stefano Spezia_, Nov 14 2021
%F A349313 a(n) ~ sqrt(1 + 6*r) / (2 * 7^(2/3) * sqrt(3*Pi) * (1-r)^(1/3) * n^(3/2) * r^(n + 1/6)), where r = 0.04196526794785323647696104132939153750367778616407409162... is the real root of the equation 6^6 * (1-r)^7 = 7^7 * r. - _Vaclav Kotesovec_, Nov 15 2021
%t A349313 nmax = 18; A[_] = 0; Do[A[x_] = (1 + x A[x]^7)/(1 - x) + O[x]^(nmax + 1) // Normal, nmax + 1]; CoefficientList[A[x], x]
%t A349313 Table[Sum[Binomial[n + 6 k, 7 k] Binomial[7 k, k]/(6 k + 1), {k, 0, n}], {n, 0, 18}]
%Y A349313 Cf. A002296, A006318, A346626, A346649, A349310, A349311, A349312, A349314.
%K A349313 nonn
%O A349313 0,2
%A A349313 _Ilya Gutkovskiy_, Nov 14 2021