%I #7 Mar 19 2023 05:01:15
%S 1,5,61,1660,47460,1621116,58002140,2213389940,87301563690,
%T 3555890156445,148125509781095,6292884402884976,271565202254735207,
%U 11878392121526009800,525519782174930309205,23481280252471520720288,1058270749214634093475910,48058678036035725619136698
%N Central terms of triangle A361550.
%H Paul D. Hanna, <a href="/A361556/b361556.txt">Table of n, a(n) for n = 0..50</a>
%F a(n) = A361550(2*n,n) for n >= 0.
%F a(n) ~ c * d^n / n^2, where d = 51.1751... and c = 0.12624... - _Vaclav Kotesovec_, Mar 19 2023
%o (PARI) {A361550(n,k) = my(A=[1]); for(i=1, n, A = concat(A, 0);
%o A[#A] = polcoeff(x*y - prod(m=1, #A, (1 - x^m) * (1 - x^m*Ser(A)) * (1 - x^(m-1)/Ser(A)) * (1 - x^(2*m-1)*Ser(A)^2) * (1 - x^(2*m-1)/Ser(A)^2) ), #A-1) );
%o polcoeff(polcoeff(Ser(A),n,x),k,y)}
%o for(n=0, 20, print1(A361550(2*n,n), ", "))
%Y Cf. A361550.
%K nonn
%O 0,2
%A _Paul D. Hanna_, Mar 19 2023