OFFSET
1,2
REFERENCES
Hugh C. Williams, Edouard Lucas and Primality Testing, John Wiley and Sons, 1998, p. 75.
LINKS
FORMULA
a(n) = 8a(n-1) - 8a(n-2) + a(n-3).
G.f.: 3*x^2*(-6+x) / ( (x-1)*(x^2-7*x+1) ). a(n) = A033888(n)-3. - R. J. Mathar, Sep 03 2010
MAPLE
with(combinat): for n from 1 to 40 do printf(`%d, `, fibonacci(4*n)-3) od: # James A. Sellers, Mar 05 2003
MATHEMATICA
Fibonacci[4Range[25]]-3 (* or *)
LinearRecurrence[{8, -8, 1}, {0, 18, 141}, 25] (* Paolo Xausa, Jan 07 2024 *)
PROG
(Magma) [Fibonacci(4*n)-3: n in [1..50]]; // Vincenzo Librandi, Apr 20 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
R. K. Guy, Mar 04 2003
EXTENSIONS
More terms from James A. Sellers, Mar 05 2003
STATUS
approved