OFFSET
0,3
PROG
(PARI) {A340934(n, k) = my(A=1); for(i=1, n, A = sum(m=0, n, x^m/(1 - x*y*A^(2*m) +x*O(x^n))) ); polcoeff(polcoeff(A, n, x), k, y)}
for(n=0, 10, print1(A340934(2*n, n), ", "))
(PARI) {A340934(n, k) = my(A=1); for(i=1, n, A = sum(m=0, n, x^m*y^m/(1 - x*A^(2*m) +x*O(x^n))) ); polcoeff(polcoeff(A, n, x), k, y)}
for(n=0, 20, print1(A340934(2*n, n), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jan 28 2021
STATUS
approved