A006054
a(n) = 2*a(n-1) + a(n-2) - a(n-3), with a(0) = a(1) = 0, a(2) = 1.
Original entry on oeis.org
0, 0, 1, 2, 5, 11, 25, 56, 126, 283, 636, 1429, 3211, 7215, 16212, 36428, 81853, 183922, 413269, 928607, 2086561, 4688460, 10534874, 23671647, 53189708, 119516189, 268550439, 603427359, 1355888968, 3046654856, 6845771321, 15382308530, 34563733525
Offset: 0
G.f. = x^2 + 2*x^3 + 5*x^4 + 11*x^5 + 25*x^6 + 56*x^7 + 126*x^8 + 283*x^9 + ... - _Michael Somos_, Jun 25 2018
- Jay Kappraff, Beyond Measure, A Guided Tour Through Nature, Myth and Number, World Scientific, 2002.
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
- Vincenzo Librandi, Table of n, a(n) for n = 0..150
- C. P. de Andrade, J. P. de Oliveira Santos, E. V. P. da Silva and K. C. P. Silva, Polynomial Generalizations and Combinatorial Interpretations for Sequences Including the Fibonacci and Pell Numbers, Open Journal of Discrete Mathematics, 2013, 3, 25-32 doi:10.4236/ojdm.2013.31006. - From _N. J. A. Sloane_, Feb 20 2013
- Maximilian Fichtner, K. Voigt, and S. Schuster, The tip and hidden part of the iceberg: Proteinogenic and non-proteinogenic aliphatic amino acids, Biochimica et Biophysica Acta (BBA)-General, 2016, Volume 1861, Issue 1, Part A, January 2017, Pages 3258-3269.
- Brian Hopkins and Hua Wang, Restricted Color n-color Compositions, arXiv:2003.05291 [math.CO], 2020.
- INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 434
- S. Morier-Genoud, V. Ovsienko, and S. Tabachnikov, Introducing supersymmetric frieze patterns and linear difference operators, Math. Z. 281 (2015) 1061.
- Simon Plouffe, Approximations de séries génératrices et quelques conjectures, Dissertation, Université du Québec à Montréal, 1992; arXiv:0911.4975 [math.NT], 2009.
- Simon Plouffe, 1031 Generating Functions, Appendix to Thesis, Montreal, 1992
- R. Sachdeva and A. K. Agarwal, Combinatorics of certain restricted n-color composition functions, Discrete Mathematics, 340, (2017), 361-372.
- P. Steinbach, Golden fields: a case for the heptagon, Math. Mag. 70 (1997), no. 1, 22-31.
- Alexey Ustinov, Supercontinuants, arXiv:1503.04497 [math.NT], 2015.
- Kai Wang, Fibonacci Numbers And Trigonometric Functions Outline, (2019).
- Roman Witula, Ramanujan Type Trigonometric Formulas: The General Form for the Argument 2*Pi/7, Journal of Integer Sequences, Vol. 12 (2009), Article 09.8.5.
- Roman Witula, D. Slota and A. Warzynski, Quasi-Fibonacci Numbers of the Seventh Order, J. Integer Seq., 9 (2006), Article 06.4.3.
- Index entries for linear recurrences with constant coefficients, signature (2,1,-1).
Cf.
A005578,
A006053,
A006356,
A007583,
A080937,
A094790,
A214683,
A214699,
A214779,
A215112,
A306334.
-
a006054 n = a006053_list !! n
a006054_list = 0 : 0 : 1 : zipWith (+) (map (2 *) $ drop 2 a006054_list)
(zipWith (-) (tail a006054_list) a006054_list)
-- Reinhard Zumkeller, Oct 14 2011
-
A006054:=z**2/(1-2*z-z**2+z**3); # Simon Plouffe in his 1992 dissertation
-
LinearRecurrence[{2, 1, -1}, {0, 0, 1}, 60] (* Vladimir Joseph Stephan Orlovsky, Feb 10 2012 *)
-
a(n):=if n<2 then 0 else if n=2 then 1 else b(n-2);
b(n):=sum(sum(binomial(j,n-3*k+2*j)*(-1)^(j-k)*binomial(k,j)*2^(-n+3*k-j),j,0,k),k,1,n); /* Vladimir Kruchinin, May 05 2011 */
-
x='x+O('x^66);
concat([0, 0], Vec(x^2/(1-2*x-x^2+x^3))) \\ Joerg Arndt, May 05 2011
A006053
a(n) = a(n-1) + 2*a(n-2) - a(n-3), with a(0) = a(1) = 0, a(2) = 1.
Original entry on oeis.org
0, 0, 1, 1, 3, 4, 9, 14, 28, 47, 89, 155, 286, 507, 924, 1652, 2993, 5373, 9707, 17460, 31501, 56714, 102256, 184183, 331981, 598091, 1077870, 1942071, 3499720, 6305992, 11363361, 20475625, 36896355, 66484244, 119801329, 215873462, 388991876, 700937471
Offset: 0
G.f. = x^2 + x^3 + 3*x^4 + 4*x^5 + 9*x^6 + 14*x^7 + 28*x^8 + 47*x^9 + ...
Regarding the description "number of compositions of n into floor(j/2) kinds of j's," the a(6)=9 compositions of 6 are (2a, 2a, 2a), (3a, 3a), (2a, 4a), (2a, 4b), (4a, 2a), (4b, 2a), (6a), (6b), (6c). - _Bridget Tenner_, Feb 25 2022
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
- R. Witula, E. Hetmaniok and D. Slota, Sums of the powers of any order roots taken from the roots of a given polynomial, Proceedings of the 15th International Conference on Fibonacci Numbers and Their Applications (2012).
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
- Robin Chapman and Nicholas C. Singer, Eigenvalues of a bidiagonal matrix, Amer. Math. Monthly, 111 (2004), p. 441.
- Nachum Dershowitz, Between Broadway and the Hudson: A Bijection of Corridor Paths, arXiv:2006.06516 [math.CO], 2020.
- Tomislav Došlić, Mate Puljiz, Stjepan Šebek, and Josip Žubrinić, On a variant of Flory model, arXiv:2210.12411 [math.CO], 2022.
- Jia Huang, A coin flip game and generalizations of Fibonacci numbers, arXiv:2501.07463 [math.CO], 2025. See p. 9.
- INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 433
- Mohammed L. Nadji, Moussa Ahmia, Daniel F. Checa, and José L. Ramírez, Arndt Compositions with Restricted Parts, Palindromes, and Colored Variants, J. Int. Seq. (2025) Vol. 28, Issue 3, Article 25.3.6. See p. 11.
- László Németh and Dragan Stevanović, Graph solution of system of recurrence equations, Research Gate, 2023. See Table 2 at p. 6.
- László Németh and László Szalay, Sequences Involving Square Zig-Zag Shapes, J. Int. Seq., Vol. 24 (2021), Article 21.5.2.
- Simon Plouffe, Approximations de séries génératrices et quelques conjectures, Dissertation, Université du Québec à Montréal, 1992; arXiv:0911.4975 [math.NT], 2009.
- Simon Plouffe, 1031 Generating Functions, Appendix to Thesis, Montreal, 1992
- R. Sachdeva and A. K. Agarwal, Combinatorics of certain restricted n-color composition functions, Discrete Mathematics, 340, (2017), 361-372.
- Genki Shibukawa, New identities for some symmetric polynomials and their applications, arXiv:1907.00334 [math.CA], 2019.
- P. Steinbach, Golden fields: a case for the heptagon, Math. Mag. 70 (1997), no. 1, 22-31.
- Kai Wang, Fibonacci Numbers And Trigonometric Functions Outline, (2019).
- Roman Witula, Ramanujan Type Trigonometric Formulas: The General Form for the Argument 2Pi/7, J. Integer Seq., 12 (2009), Article 09.8.5.
- Index entries for linear recurrences with constant coefficients, signature (1,2,-1).
-
a006053 n = a006053_list !! n
a006053_list = 0 : 0 : 1 : zipWith (+) (drop 2 a006053_list)
(zipWith (-) (map (2 *) $ tail a006053_list) a006053_list)
-- Reinhard Zumkeller, Oct 14 2011
-
[ n eq 1 select 0 else n eq 2 select 0 else n eq 3 select 1 else Self(n-1) +2*Self(n-2) -Self(n-3): n in [1..40] ]; // Vincenzo Librandi, Aug 19 2011
-
a[0]:=0: a[1]:=0: a[2]:=1: for n from 3 to 40 do a[n]:=a[n-1]+2*a[n-2]-a[n-3] od:seq(a[n], n=0..40); # Emeric Deutsch
A006053:=z**2/(1-z-2*z**2+z**3); # conjectured by Simon Plouffe in his 1992 dissertation
-
LinearRecurrence[{1,2,-1}, {0,0,1}, 50] (* Vladimir Joseph Stephan Orlovsky, May 25 2011 *)
-
{a(n) = if( n<0, n = -1-n; polcoeff( -1 / (1 - 2*x - x^2 + x^3) + x * O(x^n), n), polcoeff( x^2 / (1 - x - 2*x^2 + x^3) + x * O(x^n), n))}; /* Michael Somos, Nov 30 2014 */
-
@CachedFunction
def a(n): # a = A006053
if (n<3): return (n//2)
else: return a(n-1) + 2*a(n-2) - a(n-3)
[a(n) for n in range(41)] # G. C. Greubel, Feb 12 2023
A214699
a(n) = 3*a(n-2) - a(n-3) with a(0)=0, a(1)=3, a(2)=0.
Original entry on oeis.org
0, 3, 0, 9, -3, 27, -18, 84, -81, 270, -327, 891, -1251, 3000, -4644, 10251, -16932, 35397, -61047, 123123, -218538, 430416, -778737, 1509786, -2766627, 5308095, -9809667, 18690912, -34737096, 65882403, -122902200, 232384305, -434589003, 820055115, -1536151314
Offset: 0
We have a(2) = a(1) + a(4) = a(4) + a(7) + a(8) = -a(3) + a(5) + a(6) = 0, which implies
(c(1)/c(2))^(1/3)*c(1)^2 + (c(2)/c(4))^(1/3)*c(2)^2 + (c(4)/c(1))^(1/3)*c(4)^2 = (c(1)/c(2))^(1/3)*(c(1) + c(1)^4) + (c(2)/c(4))^(1/3)*(c(2) + c(2)^4) + (c(4)/c(1))^(1/3)*(c(4) + c(4)^4) = (c(1)/c(2))^(1/3)*(c(1)^4 + c(1)^7 + c(1)^8) + (c(2)/c(4))^(1/3)*(c(2)^4 + c(2)^7 + c(2)^8) + (c(4)/c(1))^(1/3)*(c(4)^4 + c(4)^7 + c(4)^8) = 0.
Moreover we have 3000*3^(1/3) = (c(1)/c(2))^(1/3)*c(1)^13 + (c(2)/c(4))^(1/3)*c(2)^13 + (c(4)/c(1))^(1/3)*c(4)^13. - _Roman Witula_, Oct 06 2012
- R. Witula, E. Hetmaniok, D. Slota, Sums of the powers of any order roots taken from the roots of a given polynomial, Proceedings of the Fifteenth International Conference on Fibonacci Numbers and Their Applications, Eger, Hungary, 2012
- G. C. Greubel, Table of n, a(n) for n = 0..1000
- Roman Witula, Full Description of Ramanujan Cubic Polynomials, Journal of Integer Sequences, Vol. 13 (2010), Article 10.5.7.
- Roman Witula, Ramanujan Cubic Polynomials of the Second Kind, Journal of Integer Sequences, Vol. 13 (2010), Article 10.7.5.
- Roman Witula, Ramanujan Type Trigonometric Formulae, Demonstratio Math. 45 (2012) 779-796.
- Index entries for linear recurrences with constant coefficients, signature (0,3,-1).
-
[n le 3 select 3*(1+(-1)^n)/2 else 3*Self(n-2) - Self(n-3): n in [1..40]]; // G. C. Greubel, Jan 08 2024
-
LinearRecurrence[{0,3,-1}, {0,3,0}, 30]
CoefficientList[Series[3*x/(1 - 3*x^2 + x^3),{x,0,34}],x] (* James C. McMahon, Jan 09 2024 *)
-
def a(n): # a=A214699
if (n<3): return 3*(n%2)
else: return 3*a(n-2) - a(n-3)
[a(n) for n in range(41)] # G. C. Greubel, Jan 08 2024
A215076
a(n) = 3*a(n-1) + 4*a(n-2) + a(n-3) with a(0)=3, a(1)=3, a(2)=17.
Original entry on oeis.org
3, 3, 17, 66, 269, 1088, 4406, 17839, 72229, 292449, 1184102, 4794331, 19411850, 78596976, 318232659, 1288497731, 5217020805, 21123285998, 85526438945, 346289481632, 1402097486674, 5676976825495, 22985609904813, 93066834503093, 376819919954026, 1525712707779263
Offset: 0
We have (c(1)/c(2)) + (c(2)/c(4)) + (c(4)/c(1)) = (a(1)^2 - a(2))/2 = -4, and then (c(1)/c(2))^2 + (c(2)/c(4))^2 + (c(4)/c(1))^2 = 16 - 2*a(1) = 10.
- R. Witula, E. Hetmaniok, D. Slota, Sums of the powers of any order roots taken from the roots of a given polynomial, Proceedings of the Fifteenth International Conference on Fibonacci Numbers and Their Applications, Eger, Hungary, 2012
- G. C. Greubel, Table of n, a(n) for n = 0..1000
- Roman Witula, Ramanujan Type Trigonometric Formulas: The General Form for the Argument 2*Pi/7, Journal of Integer Sequences, Vol. 12 (2009), Article 09.8.5.
- Roman Witula, Full Description of Ramanujan Cubic Polynomials, Journal of Integer Sequences, Vol. 13 (2010), Article 10.5.7.
- Roman Witula, Ramanujan Cubic Polynomials of the Second Kind, Journal of Integer Sequences, Vol. 13 (2010), Article 10.7.5.
- Roman Witula, Ramanujan Type Trigonometric Formulae, Demonstratio Math. 45 (2012) 779-796.
- Index entries for linear recurrences with constant coefficients, signature (3,4,1).
-
LinearRecurrence[{3,4,1},{3,3,17},40]
-
Vec((-3+6*x+4*x^2)/(-1+3*x+4*x^2+x^3) + O(x^30)) \\ Michel Marcus, Apr 20 2016
-
polsym(1+4*x+3*x^2-x^3, 22) \\ Joerg Arndt, Jul 09 2020
-
@CachedFunction
def a(n): # a = A215076
if (n<3): return (3,3,17)[n]
else: return 3*a(n-1) + 4*a(n-2) + a(n-3)
[a(n) for n in range(40)] # G. C. Greubel, Nov 25 2022
A120757
Expansion of x^2*(2+x)/(1-3*x-4*x^2-x^3).
Original entry on oeis.org
0, 2, 7, 29, 117, 474, 1919, 7770, 31460, 127379, 515747, 2088217, 8455018, 34233669, 138609296, 561217582, 2272323599, 9200450421, 37251863241, 150829715006, 610697048403, 2472661868474, 10011603514040, 40536155064419
Offset: 1
a(7)=1919 because M^7= [1919,3458,4312;3458,6231,7770;4312,7770,9689].
- R. Witula, E. Hetmaniok and D. Slota, Sums of the powers of any order roots taken from the roots of a given polynomial, Proceedings of the Fifteenth International Conference on Fibonacci Numbers and Their Applications, Eger, Hungary, 2012.
- G. C. Greubel, Table of n, a(n) for n = 1..1000
- P. Steinbach, Golden fields: a case for the heptagon, Math. Mag. 70 (1997), no. 1, 22-31, MR 1439165
- Roman Witula, Ramanujan Type Trigonometric Formulas: The General Form for the Argument 2*Pi/7, Journal of Integer Sequences, Vol. 12 (2009), Article 09.8.5.
- Roman Witula, Full Description of Ramanujan Cubic Polynomials, Journal of Integer Sequences, Vol. 13 (2010), Article 10.5.7.
- Roman Witula, Ramanujan Cubic Polynomials of the Second Kind, Journal of Integer Sequences, Vol. 13 (2010), Article 10.7.5.
- Roman Witula, Ramanujan Type Trigonometric Formulae, Demonstratio Math. 45 (2012) 779-796.
- Index entries for linear recurrences with constant coefficients, signature (3,4,1).
-
a:=[0,2,7]; [ n le 3 select a[n] else 3*Self(n-1) + 4*Self(n-2) + Self(n-3): n in [1..25]]; // Marius A. Burtea, Oct 03 2019
-
with(linalg): M[1]:=matrix(3,3,[0,1,1,1,1,2,1,2,2]): for n from 2 to 25 do M[n]:=multiply(M[1],M[n-1]) od: seq(M[n][1,1],n=1..25);
-
LinearRecurrence[{3,4,1},{0,2,7},40] (* Roman Witula, Aug 02 2012 *)
-
a(n)=([0,1,0; 0,0,1; 1,4,3]^(n-1)*[0;2;7])[1,1] \\ Charles R Greathouse IV, Jun 22 2016
-
@CachedFunction
def a(n): # a = A120757
if (n<3): return (0,2,7)[n]
else: return 3*a(n-1) + 4*a(n-2) + a(n-3)
[a(n) for n in range(40)] # G. C. Greubel, Nov 25 2022
New name, old name as comment; o.g.f.; reference.
A215664
a(n) = 3*a(n-2) - a(n-3), with a(0)=3, a(1)=0, and a(2)=6.
Original entry on oeis.org
3, 0, 6, -3, 18, -15, 57, -63, 186, -246, 621, -924, 2109, -3393, 7251, -12288, 25146, -44115, 87726, -157491, 307293, -560199, 1079370, -1987890, 3798309, -7043040, 13382817, -24927429, 47191491, -88165104, 166501902, -311686803, 587670810, -1101562311
Offset: 0
We have c(1)^2 + c(2)^2 + c(4)^2 + 2*(c(1)^3 + c(2)^3 + c(4)^3) = 0 and 3*a(7) + a(8) = a(3).
- D. Chmiela and R. Witula, Two parametric quasi-Fibonacci numbers of the ninth order, (submitted, 2012).
- R. Witula, Ramanujan type formulas for arguments 2Pi/7 and 2Pi/9, Demonstratio Math. (in press, 2012).
-
LinearRecurrence[{0,3,-1}, {3,0,6}, 50]
-
Vec(3*(1-x^2)/(1-3*x^2+x^3)+O(x^99)) \\ Charles R Greathouse IV, Sep 27 2012
A215512
a(n) = 5*a(n-1) - 6*a(n-2) + a(n-3), with a(0)=1, a(1)=3, a(2)=8.
Original entry on oeis.org
1, 3, 8, 23, 70, 220, 703, 2265, 7327, 23748, 77043, 250054, 811760, 2635519, 8557089, 27784091, 90213440, 292919743, 951102166, 3088205812, 10027335807, 32558546329, 105716922615, 343260670908, 1114560365179, 3618954723062, 11750672095144, 38154192502527
Offset: 0
We have a(6) = 10*a(4)+a(1), a(5) = 11*(a(3)-a(1)), a(10)-a(4)+a(3)+a(1)+a(0) = 77*10^3, and a(11)-a(4)+a(3)-a(2)+a(0) = 25*10^4 = (5^6)*(2^4).
Cf.
A215694,
A215695,
A215007,
A215008,
A215143,
A215493,
A215494,
A215510,
A215575,
A215455,
A214683,
A214699.
-
I:=[1,3,8]; [n le 3 select I[n] else 5*Self(n-1) - 6*Self(n-2) + Self(n-3): n in [1..30]]; // G. C. Greubel, Apr 23 2018
-
LinearRecurrence[{5,-6,1}, {1,3,8}, 50]
-
x='x+O('x^30); Vec((1-2*x-x^2)/(1-5*x+6*x^2-x^3)) \\ G. C. Greubel, Apr 23 2018
A214779
a(n) = 3*a(n-2) - a(n-3) with a(0)=-1, a(1)=1, a(2)=-4.
Original entry on oeis.org
-1, 1, -4, 4, -13, 16, -43, 61, -145, 226, -496, 823, -1714, 2965, -5965, 10609, -20860, 37792, -73189, 134236, -257359, 475897, -906313, 1685050, -3194836, 5961463, -11269558, 21079225, -39770137, 74507233, -140389636, 263291836, -495676141, 930265144
Offset: 0
From a(0)=-1 and A214699(0)=0 we obtain (c(1)/c(4))^(2/3) + (c(2)/c(1))^(2/3) + (c(4)/c(2))^(2/3) = 3*3^(1/3), whereas from a(1)=-1 and A214699(1)=3*3^(1/3) we get (c(1)/c(4))^(2/3)*2c(2) + (c(2)/c(1))^(2/3)*2c(4) + (c(4)/c(2))^(2/3)*2c(1) = 3*3^(1/3).
- R. Witula, E. Hetmaniok, D. Slota, Sums of the powers of any order roots taken from the roots of a given polynomial, Proceedings of the Fifteenth International Conference on Fibonacci Numbers and Their Applications, Eger, Hungary, 2012.
- Roman Witula, Full Description of Ramanujan Cubic Polynomials, Journal of Integer Sequences, Vol. 13 (2010), Article 10.5.7.
- Roman Witula, Ramanujan Cubic Polynomials of the Second Kind, Journal of Integer Sequences, Vol. 13 (2010), Article 10.7.5.
- Roman Witula, Ramanujan Type Trigonometric Formulae, Demonstratio Math. 45 (2012) 779-796.
- Index entries for linear recurrences with constant coefficients, signature (0,3,-1).
-
LinearRecurrence[{0, 3, -1}, {-1, 1, -4}, 40] (* T. D. Noe, Jul 30 2012 *)
A215665
a(n) = 3*a(n-2) - a(n-3), with a(0)=0, a(1)=a(2)=-3.
Original entry on oeis.org
0, -3, -3, -9, -6, -24, -9, -66, -3, -189, 57, -564, 360, -1749, 1644, -5607, 6681, -18465, 25650, -62076, 95415, -211878, 348321, -731049, 1256841, -2541468, 4501572, -8881245, 16046184, -31145307, 57019797, -109482105, 202204698, -385466112, 716096199
Offset: 0
We have a(1)=a(2)=a(8)=-3, a(3)=a(6)=-9, a(4)+a(11)=-10*a(10), and 47*a(5)=2*a(11).
- R. Witula, Ramanujan type formulas for arguments 2Pi/7 and 2Pi/9, Demonstratio Math., (in press, 2012).
- D. Chmiela and R. Witula, Two parametric quasi-Fibonacci numbers of the nine order, (submitted, 2012).
-
LinearRecurrence[{0,3,-1}, {0,-3,-3}, 50]
-
concat(0,Vec(-3*(1+x)/(1-3*x^2+x^3)+O(x^99))) \\ Charles R Greathouse IV, Oct 01 2012
A215666
a(n) = 3*a(n-2) - a(n-3), with a(0)=0, a(1)=-3, and a(2)=6.
Original entry on oeis.org
0, -3, 6, -9, 21, -33, 72, -120, 249, -432, 867, -1545, 3033, -5502, 10644, -19539, 37434, -69261, 131841, -245217, 464784, -867492, 1639569, -3067260, 5786199, -10841349, 20425857, -38310246, 72118920, -135356595, 254667006, -478188705, 899357613
Offset: 0
We have 8*a(3)+a(6)=5*a(6)+3*a(7)=0, a(5) + a(12) = 3000, and (a(30)-1000*a(10)-a(2))/10^5 is an integer. Further we obtain c(4)*cos(4*Pi/7)^7 + c(1)*cos(8*Pi/7)^7 + c(2)*c(2*Pi/7)^7 = -15/16.
- R. Witula, Ramanujan type formulas for arguments 2Pi/7 and 2Pi/9, Demonstratio Math., (in press, 2012).
- D. Chmiela and R. Witula, Two parametric quasi-Fibonacci numbers of the nine order, (submitted, 2012).
-
LinearRecurrence[{0,3,-1}, {0,-3,6}, 50]
-
concat(0,Vec(-3*(1-2*x)/(1-3*x^2+x^3)+O(x^99))) \\ Charles R Greathouse IV, Oct 01 2012
Showing 1-10 of 18 results.
Comments