6,2
Alois P. Heinz, Table of n, a(n) for n = 6..452
a(n) = A262168(n) - A262167(n).
b:= proc(u, o, c, k) option remember;
`if`(c<0 or c>k, 0, `if`(u+o=0, 1,
add(b(u-j, o-1+j, c+1, k), j=1..u)+
add(b(u+j-1, o-j, c-1, k), j=1..o)))
end:
a:= n-> b(n, 0$2, 6)-b(n, 0$2, 5):
seq(a(n), n=6..24);
Column k=6 of A258829.
Cf. A262167, A262168.
Sequence in context: A015020 A225166 A003384 * A332126 A229579 A033289
Adjacent sequences: A316390 A316391 A316392 * A316394 A316395 A316396
nonn
Alois P. Heinz, Jul 01 2018
approved
