A321573 Row sums of A321624.

1, 2, 8, 22, 68, 202, 608, 1822, 5468, 16402, 49208, 147622, 442868, 1328602, 3985808, 11957422, 35872268, 107616802, 322850408, 968551222, 2905653668, 8716961002, 26150883008, 78452649022, 235357947068, 706073841202, 2118221523608, 6354664570822, 19063993712468

Offset: 0

Author

Peter Luschny, Nov 22 2018

Keywords

• nonn

Links

• Index entries for linear recurrences with constant coefficients, signature (2, 3).

Crossrefs

Cf. A321624, A321620.

Programs

Mathematica

(* The function RiordanSquare is defined in A321620. *)
Lucas = 1 + x*(1 + 2x)/(1 - x - x^2);
M = RiordanSquare[Lucas, 29]; Map[Total, M]

Formula

From Philippe Deléham, Feb 05 2020: (Start)

G.f.: (1+x^2)/(1-2x-3*x^2).

a(0)=1, a(1)=2, a(2)=8, a(n)=2*a(n-1)+3*a(n-2) , for n>2.

a(0)=1, a(n) = (5*3^(n-1)-(-1)^(n-1))/2, for n>0 . (End)