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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A177685 a(n) = 6*a(n-1)-8*a(n-2) for n > 4; a(0)=603, a(1)=4731, a(2)=58834, a(3)=254204, a(4)=1032696. 5
 603, 4731, 58834, 254204, 1032696, 4162544, 16713696, 66981824, 268181376, 1073233664, 4293950976, 17177836544, 68715411456, 274869776384, 1099495366656, 4398013988864, 17592120999936, 70368614088704 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 COMMENTS Related to Reverse and Add trajectory of 537 in base 2: a(n) = A077076(4*n+3)/6, i.e., one sixth of fourth quadrisection of A077076. LINKS Vincenzo Librandi, Table of n, a(n) for n = 0..1000 FORMULA a(n) = 4^(n+6)-1985*2^(n-1) for n > 2. G.f.: (603+1113*x+35272*x^2-60952*x^3-21856*x^4) / ((1-2*x)*(1-4*x)). G.f. for the sequence starting at a(3): 4*x^3*(63551-123132*x) / ((1-2*x)*(1-4*x)). MATHEMATICA CoefficientList[Series[(603 + 1113 x + 35272 x^2 - 60952 x^3 - 21856 x^4)/((1 - 2 x) (1 - 4 x)), {x, 0, 40}], x] (* Vincenzo Librandi, Sep 24 2013 *) LinearRecurrence[{6, -8}, {603, 4731, 58834, 254204, 1032696}, 20] (* Harvey P. Dale, May 26 2019 *) PROG (PARI) {m=18; v=concat([603, 4731, 58834, 254204, 1032696], vector(m-5)); for(n=6 , m, v[n]=6*v[n-1]-8*v[n-2]); v} (Magma) [603, 4731, 58834] cat [4^(n+6)-1985*2^(n-1): n in [3..25]]; // Vincenzo Librandi, Sep 24 2013 CROSSREFS Cf. A077076 (Reverse and Add trajectory of 537 in base 2), A177682, A177683, A177684. Sequence in context: A066785 A178032 A107256 * A250907 A209550 A151626 Adjacent sequences: A177682 A177683 A177684 * A177686 A177687 A177688 KEYWORD nonn AUTHOR Klaus Brockhaus, May 12 2010 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 29 09:01 EDT 2023. Contains 361598 sequences. (Running on oeis4.)