OFFSET
0,11
COMMENTS
EXAMPLE
[0] [ 1]
[1] [ 1, 1]
[2] [ 0, 1, 1]
[3] [ 1, 1, 1, 1]
[4] [ 2, 4, 2, 1, 1]
[5] [ 6, 10, 7, 3, 1, 1]
[6] [ 18, 31, 19, 10, 4, 1, 1]
[7] [ 57, 97, 61, 29, 13, 5, 1, 1]
[8] [ 186, 316, 196, 96, 40, 16, 6, 1, 1]
[9] [ 622, 1054, 652, 316, 136, 52, 19, 7, 1, 1]
MAPLE
# The function RiordanSquare is defined in A321620.
Fine := 1 + (1 - sqrt(1 - 4*x))/(3 - sqrt(1 - 4*x)); RiordanSquare(Fine, 10);
MATHEMATICA
(* The function RiordanSquare is defined in A321620. *)
FineGF = 1 + (1 - Sqrt[1 - 4x])/(3 - Sqrt[1 - 4x]);
RiordanSquare[FineGF, 10] (* Jean-François Alcover, Jun 15 2019, from Maple *)
PROG
(Sage) # uses[riordan_square from A321620]
riordan_square(1 + (1 - sqrt(1 - 4*x))/(3 - sqrt(1 - 4*x)), 10)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Peter Luschny, Nov 22 2018
STATUS
approved