OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (4,-2,-8,5,8,-2,-4,-1).
FORMULA
MATHEMATICA
Table[((25*n^3+90*n^2+95*n+6)*LucasL[n+4] -12*(5*n^2+10*n-3)*LucasL[n+2])/150, {n, 0, 40}] (* G. C. Greubel, Apr 08 2021 *)
PROG
(Magma)
R<x>:=PowerSeriesRing(Integers(), 40);
Coefficients(R!( ((1+2*x)/(1-x-x^2))^4 )); // G. C. Greubel, Apr 08 2021
(Sage)
def A060930_list(prec):
P.<x> = PowerSeriesRing(ZZ, prec)
return P( ((1+2*x)/(1-x-x^2))^4 ).list()
A060930_list(40) # G. C. Greubel, Apr 08 2021
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wolfdieter Lang, Apr 20 2001
STATUS
approved