editing
approved
editing
approved
editing
approved
Vaclav Kotesovec, <a href="/A360479/a360479.jpg">Graph - the asymptotic ratio (10000 terms)</a>
a(n) ~ exp(exp(4/3)*n^(1/3)/3^(1/3)) * n^(2*n/3) / 3^(2*n/3 + 1) * (1 + (3^(1/3)/(8*exp(4/3)) - 13*exp(8/3)/(6*3^(2/3))) / n^(1/3) + (67/(128*3^(1/3)*exp(8/3)) - 5*3^(2/3)*exp(4/3)/16 + 169*exp(16/3)/(216*3^(1/3))) / n^(2/3) + (3929/2304 + 497/(1024*exp(4)) + 7913*exp(4)/1728 - 2197*exp(8)/11664)/n). - Vaclav Kotesovec, Feb 19 2023
approved
editing
editing
approved
Vaclav Kotesovec, <a href="/A360479/b360479.txt">Table of n, a(n) for n = 0..635</a>
approved
editing
proposed
approved
editing
proposed
Join[{1}, Table[Sum[Binomial[n - 2*k, k] * (n - 2*k)^(2*k), {k, 0, n/3}], {n, 1, 30}]] (* Vaclav Kotesovec, Feb 19 2023 *)
proposed
editing