proposed
approved
proposed
approved
editing
proposed
Andrew Howroyd, <a href="/A342985/b342985.txt">Table of n, a(n) for n = 0..1325</a> (rows 0..50)
T. R. S. Walsh, and A. B. Lehman, <a href="http://dx.doi.org/10.1016/0095-8956(75)90050-7">Counting rooted maps by genus. III: Nonseparable maps</a>, J. Combinatorial Theory Ser. B 18 (1975), 222-259, Table VIIIa.
H(n)={my(g=G(n, y)-x*(1+y), p=O(1)); while(serprec(p, x)<=n, p = subst(g, x, x*p^2)); my(v=Vec(psqrt(serreverse(x/g^2)/x))); vector(#v, n, Vecrev(v[n], n))}
approved
editing
proposed
approved
editing
proposed
0, 8, 1568, 28400, 72676, 73700, 28400, 1568, 8, 0;
1, 0, 0, 0, 2, 0, 0, 3, 3, 0, 0, 4, 36, 4, 0, 0, 5, 135, 135, 5, 0, 0, 6, 360, 1368, 360, 6, 0, 0, 7, 798, 7350, 7350, 798, 7, 0, 0, 8, 1568, 28400, 72676, 73700, 28400, 1568, 8, 0, 0, 9, 2826, 89073, 466140, 466140, 474588, 474588, 89073, 2826, 9, 0, 0, 10, 4770, 241220, 2252534, 4671020, 2252534, 2292790, 4818092, 2292790, 241220, 4770, 10, 0
approved
editing
proposed
approved
editing
proposed
H(n)={my(g=G(n, y)-x*(1+y), p=O(x1)); while(serprec(p, x)<=n, p = subst(g, x, x*p^2)); my(v=Vec(p)); vector(#v, n, Vecrev(v[n], n))}