# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/
Search: id:a145934
Showing 1-1 of 1
%I A145934 #45 Feb 28 2024 15:58:44
%S A145934 1,1,-5,-11,19,85,-29,-539,-365,2869,5059,-12155,-42509,30421,285475,
%T A145934 102949,-1609901,-2227595,7431811,20797381,-23793485,-148577771,
%U A145934 -5816861,885649765,920550931,-4393347659,-9916653245,16443432709
%N A145934 Expansion of 1/(1-x*(1-6*x)).
%C A145934 Row sums of Riordan array (1, x(1-6x)).
%C A145934 For positive n, a(n) equals the determinant of the n X n tridiagonal matrix with 1's along the main diagonal, 3's along the superdiagonal, and 2's along the subdiagonal (see Mathematica code below). - _John M. Campbell_, Jul 08 2011
%H A145934 Seiichi Manyama, Table of n, a(n) for n = 0..2569
%H A145934 Taras Goy and Mark Shattuck, Determinants of Toeplitz-Hessenberg Matrices with Generalized Leonardo Number Entries, Ann. Math. Silesianae (2023). See p. 17.
%H A145934 Index entries for linear recurrences with constant coefficients, signature (1,-6).
%F A145934 a(n) = Sum_{k=0..n} A109466(n,k)*6^(n-k).
%F A145934 a(n) = a(n-1) - 6*a(n-2); a(0)=1, a(1)=1. - _Philippe Deléham_, Oct 25 2008
%t A145934 Table[Det[Array[KroneckerDelta[#1, #2] + KroneckerDelta[#1, #2 + 1]*2 + KroneckerDelta[#1, #2 - 1]*3 &, {n, n}]], {n, 1, 40}] (* _John M. Campbell_, Jul 08 2011 *)
%t A145934 LinearRecurrence[{1,-6}, {1,1}, 30] (* _G. C. Greubel_, Jan 14 2018 *)
%o A145934 (Sage) [lucas_number1(n,1,6) for n in range(1, 29)] # _Zerinvary Lajos_, Apr 22 2009
%o A145934 (PARI) Vec(1/(1-x*(1-6*x))+O(x^99)) \\ _Charles R Greathouse IV_, Sep 23 2012
%o A145934 (Magma) I:=[1,1]; [n le 2 select I[n] else Self(n-1) - 6*Self(n-2): n in [1..30]]; // _G. C. Greubel_, Jan 14 2018
%Y A145934 Cf. A010892, A107920, A106852, A106853, A106854.
%K A145934 sign,easy
%O A145934 0,3
%A A145934 _Philippe Deléham_, Oct 25 2008
# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE