OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..576
FORMULA
From G. C. Greubel, Jan 08 2023: (Start)
G.f.: (1/(2*x))*(1 - sqrt(1-4*x))*Sum_{j>=0} A000110(j)*x^j. (End)
MATHEMATICA
Table[A014327[n], {n, 0, 40}] (* G. C. Greubel, Jan 08 2023 *)
PROG
(Magma)
A014327:= func< n | (&+[Bell(j)*Catalan(n-j): j in [0..n]]) >;
[A014327(n): n in [0..40]]; // G. C. Greubel, Jan 08 2023
(SageMath)
def A014327(n): return sum(bell_number(j)*catalan_number(n-j) for j in range(n+1))
[A014327(n) for n in range(41)] # G. C. Greubel, Jan 08 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved