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!)
 A077259 First member of the Diophantine pair (m,k) that satisfies 5*(m^2 + m) = k^2 + k; a(n) = m. 10
 0, 2, 6, 44, 116, 798, 2090, 14328, 37512, 257114, 673134, 4613732, 12078908, 82790070, 216747218, 1485607536, 3889371024, 26658145586, 69791931222, 478361013020, 1252365390980, 8583840088782, 22472785106426, 154030760585064, 403257766524696, 2763969850442378 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 REFERENCES Mohammad K. Azarian, Diophantine Pair, Problem B-881, Fibonacci Quarterly, Vol. 37, No. 3, August 1999, pp. 277-278. Solution appeared in Vol. 38, No. 2, May 2000, pp. 183-184. LINKS G. C. Greubel, Table of n, a(n) for n = 0..1000 Jeremiah Bartz, Bruce Dearden, and Joel Iiams, Counting families of generalized balancing numbers, The Australasian Journal of Combinatorics (2020) Vol. 77, Part 3, 318-325. Hermann Stamm-Wilbrandt, 6 interlaced bisections Index entries for linear recurrences with constant coefficients, signature (1,18,-18,-1,1). FORMULA Let b(n) be A007805(n). Then with a(0)=0, a(1)=2, a(2*n+2) = 2*a(2*n+1) - a(2*n) + 2*b(n), a(2*n+3) = 2*a(2*n+2) - a(2*n+1) + 2*b(n+1). a(n) = (A000045(A007310(n+1))-1)/2. - Vladeta Jovovic, Nov 02 2002 [corrected by R. J. Mathar, Sep 16 2009] a(0)=0, a(1)=2, a(n+2) = 4 + 9*a(n) + 2*Sqrt(1 +20*a(n) +20*a(n)^2). - Herbert Kociemba, May 12 2008 a(0)=0, a(1)=2, a(2)=6, a(3)=44, a(n) = 18*a(n-2) - a(n-4) + 8. - _Robert Phillips_, Sep 01 2008 G.f.: 2*x*(1+x)^2/((1-x)*(1+4*x-x^2)*(1-4*x-x^2)). - Maksym Voznyy (voznyy(AT)mail.ru), Jul 27 2009 a(n) = a(-1-n) for all n in Z. - Michael Somos, Jul 15 2018 a(2*n) = A049651(2*n); a(2*n+1) = A110679(2*n+1). See "6 interlaced bisections" link. - Hermann Stamm-Wilbrandt, Apr 18 2019 a(n) = a(n-1) + 18*a(n-2) - 18*a(n-3) - a(n-4) + a(n-5). - Wesley Ivan Hurt, Jul 24 2020 EXAMPLE a(3) = (2*6) - 2 + (2*17) = 12 - 2 + 34 = 44. G.f. = 2*x + 6*x^2 + 44*x^3 + 116*x^4 + 798*x^5 + 2090*x^6 + 14328*x^7 + ... - Michael Somos, Jul 15 2018 MAPLE f := gfun:-rectoproc({a(-2) = 2, a(-1) = 0, a(0) = 0, a(1) = 2, a(n) = 18*a(n - 2) - a(n - 4) + 8}, a(n), remember): map(f, [\$ (0 .. 40)])[]; # Vladimir Pletser, Jul 24 2020 MATHEMATICA LinearRecurrence[{1, 18, -18, -1, 1}, {0, 2, 6, 44, 116}, 30] (* G. C. Greubel, Jul 15 2018 *) a[ n_] := With[{m = Max[n, -1 - n]}, SeriesCoefficient[ 2 x (x + 1)^2 / ((1 - x) (x^2 - 4 x - 1) (x^2 + 4 x - 1)), {x, 0, m}]]; (* Michael Somos, Jul 15 2018 *) PROG (PARI) my(x='x+O('x^30)); concat([0], Vec(2*x*(x+1)^2/((1-x)*(x^2-4*x-1)*(x^2+4*x-1)))) \\ G. C. Greubel, Jul 15 2018 (MAGMA) R:=PowerSeriesRing(Integers(), 30); [0] cat Coefficients(R!(2*x*(x+1)^2/((1-x)*(x^2-4*x-1)*(x^2+4*x-1)))); // G. C. Greubel, Jul 15 2018 CROSSREFS Cf. A007805, A077260, A077261, A077262. Cf. A053141. Sequence in context: A296828 A135815 A055564 * A319112 A136589 A077048 Adjacent sequences:  A077256 A077257 A077258 * A077260 A077261 A077262 KEYWORD easy,nonn,changed AUTHOR Bruce Corrigan (scentman(AT)myfamily.com), Nov 01 2002 EXTENSIONS More terms from Colin Barker, Mar 23 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 September 25 15:31 EDT 2020. Contains 337344 sequences. (Running on oeis4.)