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 A370704 #11 Mar 12 2024 08:03:28 %S A370704 1,2,17,442,23297,2029226,262403857,47086207442,11184381577217, %T A370704 3395509635512242,1282288601819184401,589443236677619916362, %U A370704 324023682525763528809217,209882061169585594259778842,158200294157346855067204600337,137282439597406466709932610293026 %N A370704 a(n) = Sum_{k=0..n} k!*binomial(n, k)*Pochhammer(n, k). Row sums of A370707. %H A370704 Paolo Xausa, <a href="/A370704/b370704.txt">Table of n, a(n) for n = 0..200</a> %F A370704 a(n) = Sum_{k=0..n} (-1)^k*Product_{j=0..k-1} (j - n)*(j + n). %F A370704 a(n) ~ sqrt(Pi) * 4^n * n^(2*n + 1/2) / exp(2*n). - _Vaclav Kotesovec_, Mar 12 2024 %p A370704 a := n -> local k, j; add((-1)^k * mul((j - n)*(j + n), j = 0..k-1), k = 0..n): %p A370704 seq(a(n), n = 0..15); %t A370704 A370704[n_] := Sum[k!*Binomial[n, k]*Pochhammer[n, k], {k, 0, n}]; %t A370704 Array[A370704, 20, 0] (* _Paolo Xausa_, Mar 07 2024 *) %Y A370704 Cf. A370707. %K A370704 nonn %O A370704 0,2 %A A370704 _Peter Luschny_, Feb 28 2024