The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A048876 a(n) = 4*a(n-1) + a(n-2); a(0)=1, a(1)=7. 14
 1, 7, 29, 123, 521, 2207, 9349, 39603, 167761, 710647, 3010349, 12752043, 54018521, 228826127, 969323029, 4106118243, 17393796001, 73681302247, 312119004989, 1322157322203, 5600748293801, 23725150497407, 100501350283429, 425730551631123, 1803423556807921 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS Generalized Pell equation with second term of 7. LINKS T. D. Noe, Table of n, a(n) for n = 0..200 M. Bicknell, A Primer on the Pell Sequence and related sequences, Fibonacci Quarterly, Vol. 13, No. 4, 1975, pp. 345-349. L. Carlitz, R. Scoville and V. E. Hoggatt, Jr., Pellian Representations, Fib. Quart. Vol. 10, No. 5, (1972), pp. 449-488. Tanya Khovanova, Recursive Sequences A. K. Whitford, Binet's Formula Generalized, Fibonacci Quarterly, Vol. 15, No. 1, 1979, pp. 21, 24, 29. Index entries for linear recurrences with constant coefficients, signature (4,1). FORMULA G.f.: (1+3*x)/(1-4*x-x^2). - Philippe Deléham, Nov 03 2008 a(n) = ((1+sqrt(5))*(2+sqrt(5))^n + (1-sqrt(5))*(2-sqrt(5))^n )/2. a(n) = A000032(3*n+1). - Thomas Baruchel, Nov 26 2003 From Gary Detlefs, Mar 06 2011: (Start) a(n) = Fibonacci(3*n+7) mod Fibonacci(3*n+3), n > 0. a(n) = Fibonacci(3*n+3) - Fibonacci(3*n-1). (End) a(n) = A001076(n+1)+3*A001076(n). - R. J. Mathar, Oct 22 2013 a(n) = 5*F(2*n)*F(n+1) - L(n-1)*(-1)^n. - J. M. Bergot, Mar 22 2016 a(n) = Sum_{k=0..n} binomial(n,k)*5^floor((k+1)/2)*2^(n-k). - Tony Foster III, Sep 03 2017 MAPLE with(combinat): a:=n->3*fibonacci(n-1, 4)+fibonacci(n, 4): seq(a(n), n=1..16); # Zerinvary Lajos, Apr 04 2008 MATHEMATICA f[n_] := Block[{s = Sqrt@ 5}, Simplify[((1 + s)(2 + s)^n + (1 - s)(2 - s)^n)/2]]; (* Or *) f[n_] := Fibonacci[3 n + 3] - Fibonacci[3 n - 1]; (* Or *) f[n_] := Mod[ Fibonacci[3n + 7], Fibonacci[3n + 3]]; Array[f, 22, 0] a[n_] := 4a[n - 1] + a[n - 2]; a[0] = 1; a[1] = 7; Array[a, 22, 0] (* Or *) CoefficientList[ Series[(1 + 3x)/(1 - 4x - x^2), {x, 0, 21}], x] (* Robert G. Wilson v *) LinearRecurrence[{4, 1}, {1, 7}, 30] (* Harvey P. Dale, Jun 13 2015 *) Table[LucasL[3*n + 1], {n, 0, 20}] (* Rigoberto Florez, Apr 04 2019 *) PROG (PARI) Vec((1+3*x)/(1-4*x-x^2) + O(x^30)) \\ Altug Alkan, Oct 07 2015 CROSSREFS Cf. A001076, A001077, A015448, A033887. Sequence in context: A037576 A327587 A055427 * A126394 A252832 A074468 Adjacent sequences: A048873 A048874 A048875 * A048877 A048878 A048879 KEYWORD easy,nonn AUTHOR STATUS approved

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

Last modified March 28 05:31 EDT 2023. Contains 361577 sequences. (Running on oeis4.)