# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a055991 Showing 1-1 of 1 %I A055991 #41 Oct 12 2022 08:41:48 %S A055991 1,5,19,69,250,907,3292,11949,43371,157422,571388,2073943,7527704, %T A055991 27322992,99173120,359964521,1306548149,4742323107,17213011605, %U A055991 62477347458,226771411939,823102698260,2987581397893,10843899100203 %N A055991 a(n) is its own 4th difference. %C A055991 a(n) is the number of distinct matrix products in (A+B+C+D+E)^n where A,B,C and D all commute with each other, but not with E. - _Paul D. Hanna_ and _Max Alekseyev_, Feb 01 2006 %C A055991 Row sums of Riordan array (1,1/(1-x)^4). - _Paul Barry_, Feb 02 2006 %C A055991 Quadrisection of A003269: a(n)=A003269(4n-1). - _Paul Barry_, Feb 02 2006 %C A055991 From _Gary W. Adamson_, Apr 23 2009: (Start) %C A055991 Equals the INVERT transform of the tetrahedral series. %C A055991 a(4) = 69 = (1, 4, 10) dot (19, 5, 1) + 20; = (19 + 20 + 10) + 20. (End) %H A055991 Vincenzo Librandi, Table of n, a(n) for n = 1..1000 %H A055991 D. Birmajer, J. B. Gil, and M. D. Weiner, On the Enumeration of Restricted Words over a Finite Alphabet, J. Int. Seq. 19 (2016) # 16.1.3, example 16. %H A055991 Milan Janjić, Pascal Matrices and Restricted Words, J. Int. Seq., Vol. 21 (2018), Article 18.5.2. %H A055991 Index entries for linear recurrences with constant coefficients, signature (5,-6,4,-1). %F A055991 a(n) = 5*a(n-1)-6*a(n-2)+4*a(n-3)-a(n-4) = a(n-1)+A055990(n) = A055988(n+1)-A055988(n) = A055989(n+1)-2*A055989(n)+A055989(n-1). %F A055991 Letting a(0)=1, we have a(n)=sum(u=0, n-1, sum(v=0, u, sum(w=0, v, sum(x=0, w, a(x))))) for n>0. - _Benoit Cloitre_, Jan 26 2003 %F A055991 a(n) = sum_{k=1..n} binomial(n+3*k-1, n-k). - _Vladeta Jovovic_, Mar 23 2003 %F A055991 a(n) = sum{k=0..n, binomial(4n-3k-1,k)}. - _Paul Barry_, Feb 02 2006 %F A055991 G.f.: x/(1-5x+6x^2-4x^3+x^4). - _Paul Barry_, Feb 02 2006 %t A055991 LinearRecurrence[{5,-6,4,-1},{1,5,19,69},30] (* _Harvey P. Dale_, Feb 27 2013 *) %o A055991 (Magma) I:=[1, 5, 19, 69]; [n le 4 select I[n] else 5*Self(n-1)-6*Self(n-2)+4*Self(n-3)-Self(n-4): n in [1..30]]; // _Vincenzo Librandi_, Apr 05 2012 %Y A055991 Cf. A055988, A055989, A055990 for the other differences of a(n). See A000079, A001906, A052529 for examples of sequences which are respectively their own first, second and third differences. %K A055991 nonn,easy %O A055991 1,2 %A A055991 _Henry Bottomley_, Jun 02 2000 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE