login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A053296
Partial sums of A053295.
9
1, 8, 37, 129, 376, 967, 2267, 4950, 10220, 20175, 38403, 70954, 127921, 226007, 392688, 672959, 1140260, 1914166, 3189022, 5280288, 8699540, 14275838, 23352118, 38102976, 62048869, 100888126, 163843187, 265838881, 431026972, 698489013, 1131463777, 1832277574, 2966502032, 4802042229
OFFSET
0,2
REFERENCES
A. H. Beiler, Recreations in the Theory of Numbers, Dover, N.Y., 1964, pp. 189, 194-196.
LINKS
FORMULA
a(n) = Sum_{i=0..floor(n/2)} C(n+7-i, n-2i), n >= 0.
a(n) = a(n-1) + a(n-2) + C(n+6,6); n >= 0, with a(-1) = 0.
From G. C. Greubel, Oct 21 2024: (Start)
a(n) = Fibonacci(n+15) - Sum_{j=0..6} Fibonacci(14-2*j)*binomial(n+j,j).
a(n) = Fibonacci(n+15) - (1/6!)*(n^6 + 39*n^5 + 685*n^4 + 7185*n^3 + 48994*n^2 + 209496*n + 438480).
G.f.: 1/((1-x)^7*(1 - x - x^2)). (End)
MATHEMATICA
Table[Sum[Binomial[n+7-j, n-2*j], {j, 0, Floor[n/2]}], {n, 0, 50}] (* G. C. Greubel, May 24 2018 *)
PROG
(PARI) for(n=0, 30, print1(sum(j=0, floor(n/2), binomial(n+7-j, n-2*j)), ", ")) \\ G. C. Greubel, May 24 2018
(Magma) [(&+[Binomial(n+7-j, n-2*j): j in [0..Floor(n/2)]]): n in [0..30]]; // G. C. Greubel, May 24 2018
CROSSREFS
Right-hand column 14 of triangle A011794.
Sequence in context: A001780 A258476 A320754 * A055799 A035038 A240188
KEYWORD
easy,nonn
AUTHOR
Barry E. Williams, Mar 04 2000
EXTENSIONS
Terms a(28) onward added by G. C. Greubel, May 24 2018
STATUS
approved