OFFSET
0,3
COMMENTS
a(n) is the number of partitions of [2n] such that the largest element of each block is even. a(3) = 17: 123456, 1234|56, 12356|4, 124|356, 1256|34, 12|3456, 12|34|56, 12|356|4, 13456|2, 134|256, 134|2|56, 1356|24, 1356|2|4, 14|2356, 156|234, 14|2|356, 156|2|34. - Alois P. Heinz, Jun 10 2023
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..303
MAPLE
b:= proc(n, x, y) option remember; `if`(n=0, 1, `if`(n::odd, 0,
b(n-1, y, x+1))+b(n-1, y, x)*x+b(n-1, y, x)*y)
end:
a:= n-> b(2*n, 0$2):
seq(a(n), n=0..19); # Alois P. Heinz, Jun 10 2023
MATHEMATICA
nmax = 19; CoefficientList[Series[Sum[j! x^j/Product[(1 - k^2 x), {k, 1, j}], {j, 0, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 06 2019
STATUS
approved