This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A107328 Even-indexed Lucas numbers + 1 (i.e. A000032(2n) + 1). 0
 3, 4, 8, 19, 48, 124, 323, 844, 2208, 5779, 15128, 39604, 103683, 271444, 710648, 1860499, 4870848, 12752044, 33385283, 87403804, 228826128, 599074579, 1568397608, 4106118244, 10749957123, 28143753124 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 COMMENTS Sum of n-th powers of roots of cubic polynomial x^3 - 4*x^2 + 4x - 1. This real-root cubic polynomial is the characteristic polynomial generated by the Bombieri-like morphism: 1->{1,2,1},2->{1},3->{2,3}. LINKS FORMULA G.f.: (1-2*x)*(3-2*x)/((1-x)*(1+3*x-x^2)). a(n)=A065034(n). [From R. J. Mathar, Aug 24 2008] MATHEMATICA poly=Function[x, x^3-4*x^2+4x-1]; Table[RootSum[poly, Function[x, x^n]], {n, 0, 25}] PROG sage: [lucas_number2(n, 3, 1)+1 for n in xrange(0, 29)] - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Jul 06 2008 CROSSREFS Sequence in context: A183494 A107429 A061273 * A129285 A051440 A101932 Adjacent sequences:  A107325 A107326 A107327 * A107329 A107330 A107331 KEYWORD uned,nonn AUTHOR Roger Bagula, May 22 2005 EXTENSIONS Corrected and edited by N. J. A. Sloane, Nov 11 2006 STATUS approved

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

Content is available under The OEIS End-User License Agreement .