OFFSET
1,2
LINKS
Paul D. Hanna, Table of n, a(n) for n = 1..51
FORMULA
a(n) = A361050(2*n-1,n-1) for n >= 1.
a(n) ~ c * d^n / n^2, where d = 166.5794571279985... and c = 0.000249393859904361... - Vaclav Kotesovec, Mar 19 2023
PROG
(PARI) {A361050(n, k) = my(A=[0, 1]); for(i=1, n, A = concat(A, 0);
A[#A] = polcoeff(y/x - 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-4) );
polcoeff(polcoeff(H=Ser(A), n, x), k, y)}
for(n=1, 16, print1(A361050(2*n-1, n-1), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Mar 18 2023
STATUS
approved