|
|
|
|
1, 4, 20, 108, 604, 3444, 19876, 115644, 676748, 3977316, 23451700, 138634764, 821221692, 4872734676, 28952250564, 172222729308, 1025461169772, 6110912705220, 36441840179284, 217450403367852, 1298228971572764, 7754336590794804, 46335720234364900
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
Table of n, a(n) for n=0..22.
|
|
FORMULA
|
G.f.: 1/(sqrt(1 - 6*x + x^2) - x). - Philippe Deléham, Feb 05 2020
|
|
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 *)
|
|
CROSSREFS
|
Cf. A321623, A321620.
Sequence in context: A265084 A321111 A319321 * A225621 A020084 A325956
Adjacent sequences: A321571 A321572 A321573 * A321575 A321576 A321577
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Peter Luschny, Nov 22 2018
|
|
STATUS
|
approved
|
|
|
|