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 A346769 #10 Aug 02 2021 15:51:46
%S A346769 1,1,9,117,1849,33099,648683,13652529,304828941,7160371928,
%T A346769 175882500852,4497024667232,119255943612372,3270580645588057,
%U A346769 92537409967439493,2695752129992788115,80716475549045336327,2480352681613911495046,78120174740199126232258
%N A346769 a(n) = Sum_{k=0..n} Stirling2(n,k) * binomial(8*k,k) / (7*k + 1).
%C A346769 Stirling transform of A007556.
%H A346769 Michael De Vlieger, <a href="/A346769/b346769.txt">Table of n, a(n) for n = 0..488</a>
%F A346769 G.f.: Sum_{k>=0} ( binomial(8*k,k) / (7*k + 1) ) * x^k / Product_{j=0..k} (1 - j*x).
%t A346769 Table[Sum[StirlingS2[n, k] Binomial[8 k, k]/(7 k + 1), {k, 0, n}], {n, 0, 18}]
%t A346769 nmax = 18; CoefficientList[Series[Sum[(Binomial[8 k, k]/(7 k + 1)) x^k/Product[1 - j x, {j, 0, k}], {k, 0, nmax}], {x, 0, nmax}], x]
%t A346769 nmax = 18; CoefficientList[Series[HypergeometricPFQ[{1/8, 1/4, 3/8, 1/2, 5/8, 3/4, 7/8}, {2/7, 3/7, 4/7, 5/7, 6/7, 1, 8/7}, 16777216 (Exp[x] - 1)/823543], {x, 0, nmax}], x] Range[0, nmax]!
%o A346769 (PARI) a(n) = sum(k=0, n, stirling(n, k, 2)*binomial(8*k, k)/(7*k + 1)); \\ _Michel Marcus_, Aug 02 2021
%Y A346769 Cf. A007556, A064856, A346764, A346765, A346766, A346767, A346768.
%K A346769 nonn
%O A346769 0,3
%A A346769 _Ilya Gutkovskiy_, Aug 02 2021