login
Gaussian binomial coefficient [ n,2 ] for q = -2.
6

%I #32 Dec 07 2019 12:18:18

%S 1,3,15,55,231,903,3655,14535,58311,232903,932295,3727815,14913991,

%T 59650503,238612935,954429895,3817763271,15270965703,61084037575,

%U 244335800775,977343902151,3909374210503,15637499638215

%N Gaussian binomial coefficient [ n,2 ] for q = -2.

%D J. Goldman and G.-C. Rota, The number of subspaces of a vector space, pp. 75-83 of W. T. Tutte, editor, Recent Progress in Combinatorics. Academic Press, NY, 1969.

%D I. P. Goulden and D. M. Jackson, Combinatorial Enumeration. Wiley, NY, 1983, p. 99.

%D M. Sved, Gaussians and binomials, Ars. Combinatoria, 17A (1984), 325-351.

%H G. C. Greubel, <a href="/A015249/b015249.txt">Table of n, a(n) for n = 2..500</a>

%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,6,-8)

%F G.f.: x^2/((1-x)*(1+2*x)*(1-4*x)).

%F a(n) = 5*a(n-1) - 4*a(n-2) + (-1)^n *2^(n-2), n >= 4. - _Vincenzo Librandi_, Mar 20 2011

%F a(n) = 3*a(n-1) + 6*a(n-2) - 8*a(n-3), n >= 3. - _Vincenzo Librandi_, Mar 20 2011

%F a(n) = (1/18)*(4^n - 2 + (-1)^n*2^n). - _R. J. Mathar_, Mar 21 2011

%t Join[{a=1,b=3},Table[c=2*b+8*a+1;a=b;b=c,{n,60}]] (* _Vladimir Joseph Stephan Orlovsky_, Feb 05 2011 *)

%t Table[QBinomial[n, 2, -2], {n, 2, 25}] (* _G. C. Greubel_, Jul 30 2016 *)

%o (Sage) [gaussian_binomial(n,2,-2) for n in range(2,25)] # _Zerinvary Lajos_, May 28 2009

%o (PARI) a(n)=(4^n - 2 + (-1)^n*2^n)/18 \\ _Charles R Greathouse IV_, Jul 30 2016

%Y Except for initial terms, same as A084152 and A084175.

%K nonn,easy

%O 2,2

%A _Olivier GĂ©rard_, Dec 11 1999