login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A139748 a(n) = Sum_{ k >= 0} binomial(n,5*k+3). 5
0, 0, 0, 1, 4, 10, 20, 35, 57, 93, 165, 330, 715, 1574, 3381, 6995, 13990, 27370, 53143, 103702, 204820, 409640, 826045, 1669801, 3368259, 6765175, 13530350, 26985675, 53774932, 107232053, 214146295, 428292590, 857417220, 1717012749, 3437550076 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,5

COMMENTS

From Gary W. Adamson, Mar 14 2009: (Start)

M^n * [1,0,0,0,0] = [A139398(n), A139761(n), a(n), A139714(n), A133476(n)]

where M = a 5 X 5 matrix [1,1,0,0,0; 0,1,1,0,0; 0,0,1,1,0; 0,0,0,1,1; 1,0,0,0,1]

Sum of terms = 2^n. Example: M^6 * [1,0,0,0,0] = [7, 15, 20, 15, 7]; sum = 64. (End)

LINKS

Table of n, a(n) for n=0..34.

Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,2).

FORMULA

G.f.: x^3*(x-1)/((2*x-1)*(x^4-2*x^3+4*x^2-3*x+1)). [Maksym Voznyy (voznyy(AT)mail.ru), Aug 12 2009]

MAPLE

a:= n-> (Matrix(5, (i, j)-> `if`((j-i) mod 5 in [0, 1], 1, 0))^n)[3, 1]:

seq(a(n), n=0..35);  # Alois P. Heinz, Dec 21 2015

MATHEMATICA

CoefficientList[Series[x^3 (x - 1)/((2 x - 1) (x^4 - 2 x^3 + 4 x^2 - 3 x + 1)), {x, 0, 50}], x] (* Vincenzo Librandi, Dec 21 2015 *)

PROG

(PARI) a(n) = sum(k=0, n\5, binomial(n, 5*k+3)); \\ Michel Marcus, Dec 21 2015

(PARI) x='x+O('x^100); concat([0, 0, 0], Vec(x^3*(x-1)/((2*x-1)*(x^4-2*x^3+4*x^2-3*x+1)))) \\ Altug Alkan, Dec 21 2015

(MAGMA) I:=[0, 0, 0, 1, 4]; [n le 5 select I[n] else 5*Self(n-1)- 10*Self(n-2)+10*Self(n-3)-5*Self(n-4)+2*Self(n-5): n in [1..40]]; // Vincenzo Librandi, Dec 21 2015

CROSSREFS

Cf. A049016, A133476, A139714.

Sequence in context: A057319 A034223 A266353 * A137359 A134987 A261636

Adjacent sequences:  A139745 A139746 A139747 * A139749 A139750 A139751

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Jun 13 2008

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified June 25 22:15 EDT 2017. Contains 288730 sequences.