A113861 a(n) = (1/9)*((6*n - 7)*2^(n-1) - (-1)^n).
0, 1, 5, 15, 41, 103, 249, 583, 1337, 3015, 6713, 14791, 32313, 70087, 151097, 324039, 691769, 1470919, 3116601, 6582727, 13864505, 29127111, 61050425, 127693255, 266571321, 555512263, 1155763769, 2401006023, 4980969017, 10319851975, 21355531833, 44142719431
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
- T. Etzion, On the stopping redundancy of Reed-Muller codes, IEEE Trans. Information Theory 52 (11) (2006) 4867-4879; arXiv:cs.IT/0511056.
- Index entries for linear recurrences with constant coefficients, signature (3,0,-4).
Programs
-
Mathematica
Join[{0},Numerator[CoefficientList[Series[(x+1)/((x-1)*(x^2+x-2)),{x,0,40}],x]]] (* Vladimir Joseph Stephan Orlovsky, Feb 01 2012 *) LinearRecurrence[{3,0,-4},{0,1,5},40] (* Harvey P. Dale, Jun 16 2022 *)
-
PARI
a(n)=((6*n-7)<<(n-1)-(-1)^n)/9 \\ Charles R Greathouse IV, Jan 13 2012
Formula
a(n+1) - 2*a(n) = A001045(n+2), Jacobsthal numbers. - Paul Curtz, Jul 05 2008
3*a(n) - a(n+1) = -1, -2, 4*a(n). - Paul Curtz, Jul 05 2008
From R. J. Mathar, Nov 11 2008: (Start)
G.f.: x^2*(1+2*x)/((1+x)*(1-2*x)^2).
a(n) + a(n+1) = A014480(n-1). (End)
a(n) = 4*a(n-1) - 4*a(n-2) + (-1)^(n+1), n>2. - Gary Detlefs, Dec 19 2010
a(n) = 3*a(n-1) - 4*a(n-3), n>3. - Gary Detlefs, Dec 19 2010
a(n) = n*2^n - A045883(n). - Michel Lagneau, Jan 13 2012
Starting with "1" = triangle A059260 * A016813 as a vector, where A016813 = (4n + 1): [ 1, 5, 9, 13, ...]. - Gary W. Adamson, Mar 06 2012
Comments