A321574 Row sums of A321623.

1, 4, 20, 108, 604, 3444, 19876, 115644, 676748, 3977316, 23451700, 138634764, 821221692, 4872734676, 28952250564, 172222729308, 1025461169772, 6110912705220, 36441840179284, 217450403367852, 1298228971572764, 7754336590794804, 46335720234364900

Offset: 0

Author

Peter Luschny, Nov 22 2018

Keywords

• nonn

Crossrefs

Cf. A321623, A321620.

Programs

Mathematica

(* The function RiordanSquare is defined in A321620. *)
LargeSchröder =  (1 - x - Sqrt[1 - 6x + x^2])/(2x);
M = RiordanSquare[LargeSchröder, 23]; Map[Total, M]
(* Alternative: *)
CoefficientList[Series[1/(Sqrt[1-6x+x^2]-x),{x,0,22}],x] (* Stefano Spezia, Feb 05 2020 *)

Formula

G.f.: 1/(sqrt(1 - 6*x + x^2) - x). - Philippe Deléham, Feb 05 2020