|
|
A060926
|
|
Row sums of triangle A060923 (even part of bisection of Lucas triangle).
|
|
4
|
|
|
1, 5, 29, 149, 765, 3941, 20301, 104565, 538589, 2774149, 14289005, 73599381, 379093501, 1952623525, 10057515149, 51803949749, 266830242845, 1374381274821, 7079122173101, 36462931836885
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1+4*x^2)/(1-5*x-4*x^3).
|
|
MATHEMATICA
|
LinearRecurrence[{5, 0, 4}, {1, 5, 29}, 31] (* G. C. Greubel, Apr 09 2021 *)
|
|
PROG
|
(Magma) I:=[1, 5, 29]; [n le 3 select I[n] else 5*Self(n-1) + 4*Self(n-3): n in [1..30]]; // G. C. Greubel, Apr 09 2021
(Sage)
P.<x> = PowerSeriesRing(QQ, prec)
return P( (1+4*x^2)/(1-5*x-4*x^3) ).list()
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|