The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A173855 a(n) = A173039(n+4) - A173039(n+1). 1
 8, 4, 24, 40, 12, 56, 72, 20, 88, 104, 28, 120, 136, 36, 152, 168, 44, 184, 200, 52, 216, 232, 60, 248, 264, 68, 280, 296, 76, 312, 328, 84, 344, 360, 92, 376, 392, 100, 408, 424, 108, 440, 456, 116, 472, 488, 124, 504, 520, 132, 536, 552, 140, 568, 584, 148 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS From Balmer odd terms. Note that ( (a(n+1)=8,) - (Balmer A061037 odd numbers = A173039(n+4) = 5, ) = 3, 1, 3, -5, -3, -21, ... = -A173039. LINKS G. C. Greubel, Table of n, a(n) for n = 1..5000 Index entries for linear recurrences with constant coefficients, signature (0,0,2,0,0,-1). FORMULA a(n) = 4*A173773(n). a(n) = 2*a(n-3) - a(n-6). - Colin Barker, Oct 15 2014 G.f.: 4*x*(x+1)*(2*x^4 - x^3 + 7*x^2 - x + 2) / ((x-1)^2*(x^2 + x + 1)^2). - Colin Barker, Oct 15 2014 EXAMPLE a(1) = 5 - (-3) = 8, a(2) = 3 - (-1) = 4, a(3) = 21 - (-3) = 24. MAPLE a:= LREtools[REtoproc](f(n) = 2*f(n-3)-f(n-6), f(n), zip((s, t)->f(s)=t, [\$1..6], [8, 4, 24, 40, 12, 56]), remember): seq(a(n), n=1..100); # Robert Israel, Oct 15 2014 MATHEMATICA Rest[CoefficientList[Series[4*x*(x+1)*(2*x^4-x^3+7*x^2-x+2)/((x-1)^2*(x^2 +x+1)^2), {x, 0, 50}], x]] (* G. C. Greubel, Sep 20 2018 *) PROG (PARI) Vec(4*x*(x+1)*(2*x^4-x^3+7*x^2-x+2)/((x-1)^2*(x^2+x+1)^2) + O(x^100)) \\ Colin Barker, Oct 15 2014 (MAGMA) m:=50; R:=PowerSeriesRing(Integers(), m); Coefficients(R!(4*x*(x+1)*(2*x^4-x^3+7*x^2-x+2)/((x-1)^2*(x^2+x+1)^2))); // G. C. Greubel, Sep 20 2018 CROSSREFS Cf. A017113, A173039, A173773. Sequence in context: A151726 A070290 A307266 * A143368 A160415 A160411 Adjacent sequences:  A173852 A173853 A173854 * A173856 A173857 A173858 KEYWORD nonn,easy AUTHOR Paul Curtz, Nov 26 2010 EXTENSIONS More terms from Colin Barker, Oct 15 2014 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 23 21:20 EST 2020. Contains 332195 sequences. (Running on oeis4.)