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 A360708 #17 Feb 20 2023 07:36:28 %S A360708 1,0,1,1,2,5,14,42,136,479,1825,7433,32053,145608,695081,3479117, %T A360708 18209842,99373513,563920590,3320674902,20255823092,127799984935, %U A360708 832807892861,5597481205009,38753768384761,276057156622776,2021100095469577,15193591060371577 %N A360708 Expansion of Sum_{k>=0} (x^2 / (1 - k*x))^k. %H A360708 Winston de Greef, <a href="/A360708/b360708.txt">Table of n, a(n) for n = 0..630</a> %F A360708 a(n) = Sum_{k=1..floor(n/2)} k^(n-2*k) * binomial(n-k-1,k-1) for n > 0. %t A360708 Join[{1},Table[Sum[Binomial[n-k-1,k-1] * k^(n-2*k), {k,0,n/2}], {n,1,40}]] (* _Vaclav Kotesovec_, Feb 20 2023 *) %o A360708 (PARI) my(N=30, x='x+O('x^N)); Vec(sum(k=0, N, (x^2/(1-k*x))^k)) %o A360708 (PARI) a(n) = if(n==0, 1, sum(k=1, n\2, k^(n-2*k)*binomial(n-k-1, k-1))); %Y A360708 Cf. A080108, A360709. %Y A360708 Cf. A000248, A360699. %K A360708 nonn %O A360708 0,5 %A A360708 _Seiichi Manyama_, Feb 17 2023