cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A001874 Convolved Fibonacci numbers.

This page as a plain text file.
%I A001874 M4174 N1738 #52 Jan 31 2020 07:23:43
%S A001874 1,6,27,98,315,924,2534,6588,16407,39430,91959,209034,464723,1013292,
%T A001874 2171850,4584620,9546570,19635840,39940460,80421600,160437690,
%U A001874 317354740,622844730,1213580820,2348773525,4517541378,8638447293,16428864606,31086197469,58539877020
%N A001874 Convolved Fibonacci numbers.
%C A001874 a(n) = (((-i)^n)/5!)*(d^5/dx^5)S(n+5,x)|_{x=i}, where i is the imaginary unit. Fifth derivative of Chebyshev S(n+5,x) polynomials evaluated at x=i multiplied by ((-i)^n)/5!. See A049310 for the S-polynomials. - _Wolfdieter Lang_, Apr 04 2007
%C A001874 a(n) is the number of weak compositions of n in which exactly 5 parts are 0 and all other parts are either 1 or 2. - _Milan Janjic_, Jun 28 2010
%D A001874 J. Riordan, Combinatorial Identities, Wiley, 1968, p. 101.
%D A001874 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
%D A001874 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H A001874 T. D. Noe, <a href="/A001874/b001874.txt">Table of n, a(n) for n = 0..500</a>
%H A001874 P. J. Cameron, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL3/groups.html">Sequences realized by oligomorphic permutation groups</a>, J. Integ. Seqs. Vol. 3 (2000), #00.1.5.
%H A001874 <a href="/index/Rec#order_12">Index entries for linear recurrences with constant coefficients</a>, signature (6,-9,-10,30,6,-41,-6,30,10,-9,-6,-1).
%F A001874 G.f.: ( 1 - x - x^2 )^(-6).
%F A001874 a(n) = F'''''(n+5, 1)/5!, i.e., 1/5! times the 5th derivative of the (n+5)th Fibonacci polynomial evaluated at 1. - _T. D. Noe_, Jan 18 2006
%e A001874 G.f. = 1 + 6*x + 27*x^2 + 98*x^3 + 315*x^4 + 924*x^5 + 2534*x^6 + ...
%p A001874 a:= n-> (Matrix(12, (i, j)-> `if`(i=j-1, 1, `if`(j=1, [6, -9, -10,
%p A001874          30, 6, -41, -6, 30, 10, -9, -6, -1][i], 0)))^n)[1, 1]:
%p A001874 seq(a(n), n=0..31);  # _Alois P. Heinz_, Aug 15 2008
%t A001874 nn = 30; t = CoefficientList[Series[1/(1 - x - x^2)^6, {x, 0, nn}], x] (* _T. D. Noe_, Aug 10 2012 *)
%o A001874 (Sage) taylor( mul(x/(1-x-x^2)^2 for i in range(1,4)),x,0,27) # _Zerinvary Lajos_, Jun 01 2009
%Y A001874 Cf. A049310.
%K A001874 nonn,easy
%O A001874 0,2
%A A001874 _N. J. A. Sloane_, _Simon Plouffe_