login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A072265 Variant of Lucas numbers: a(n) = a(n-1)+4*a(n-2) starting with a(0)=2 and a(1)=1. 7
2, 1, 9, 13, 49, 101, 297, 701, 1889, 4693, 12249, 31021, 80017, 204101, 524169, 1340573, 3437249, 8799541, 22548537, 57746701, 147940849, 378927653, 970691049, 2486401661, 6369165857, 16314772501, 41791435929, 107050525933, 274216269649, 702418373381 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

COMMENTS

Pisano period lengths: 1, 1, 8, 1, 6, 8, 48, 2, 24, 6,120, 8, 12, 48, 24, 4, 8, 24, 18, 6,... . - R. J. Mathar, Aug 10 2012

The Lucas sequence V(1,-4). - Peter Bala, Jun 23 2015

REFERENCES

Thomas Koshy, "Fibonacci and Lucas Numbers with Applications", Wiley, 2001, p. 471.

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..1000

Wikipedia, Lucas sequence

Index entries for linear recurrences with constant coefficients, signature (1,4).

FORMULA

G.f.: (2-x)/(1-x-4x^2). - Gary W. Adamson, Jul 02 2003

a(n) = ((1+sqrt(17))/2)^n + ((1-sqrt(17))/2)^n = 4*A006131(n-1) + A006131(n+1) = A075117(4, n).

a(n) = [x^n] ( (1 + x + sqrt(1 + 2*x + 17*x^2))/2 )^n for n >= 1. - Peter Bala, Jun 23 2015

MAPLE

a := n -> (Matrix([[1, 2]]). Matrix([[1, 1], [4, 0]])^n)[1, 2]; seq (a(n), n=0..26); # Alois P. Heinz, Aug 15 2008

MATHEMATICA

CoefficientList[Series[(z - 2)/(4 z^2 + z - 1), {z, 0, 200}], z] (* Vladimir Joseph Stephan Orlovsky, Jun 11 2011 *)

PROG

(PARI) a(n)=if(n<0, 0, polsym(4+x-x^2, n)[n+1])

(Sage) [lucas_number2(n, 1, -4) for n in xrange(0, 27)] # Zerinvary Lajos, Apr 30 2009

CROSSREFS

Cf. A006131.

Sequence in context: A198204 A099599 A085488 * A192352 A180001 A204371

Adjacent sequences:  A072262 A072263 A072264 * A072266 A072267 A072268

KEYWORD

easy,nonn

AUTHOR

Miklos Kristof, Jul 08 2002

EXTENSIONS

Edited and extended by Henry Bottomley, Sep 03 2002

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified November 22 10:40 EST 2017. Contains 295087 sequences.