A015110 Triangle of q-binomial coefficients for q=-3.
1, 1, 1, 1, -2, 1, 1, 7, 7, 1, 1, -20, 70, -20, 1, 1, 61, 610, 610, 61, 1, 1, -182, 5551, -15860, 5551, -182, 1, 1, 547, 49777, 433771, 433771, 49777, 547, 1, 1, -1640, 448540, -11662040, 35569222, -11662040, 448540, -1640, 1, 1, 4921, 4035220, 315323620
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Crossrefs
Cf. analog triangles for other q: A015109 (q=-2), A015112 (q=-4), A015113 (q=-5), A015116 (q=-6), A015117 (q=-7), A015118 (q=-8), A015121 (q=-9), A015123 (q=-10), A015124 (q=-11), A015125 (q=-12), A015129 (q=-13), A015132 (q=-14), A015133 (q=-15); A022166 (q=2), A022167 (q=3), A022168, A022169, A022170, A022171, A022172, A022173, A022174 (q=10), A022175, A022176, A022177, A022178, A022179, A022180, A022181, A022182, A022183, A022184 (q=20), A022185, A022186, A022187, A022188. - M. F. Hasler, Nov 04 2012
Programs
-
Mathematica
Flatten[Table[QBinomial[n, m, -3], {n, 0, 50}, {m, 0, n}]] (* Vincenzo Librandi, Nov 01 2012 *)
-
PARI
T015110(n, k, q=-3)=prod(i=1, k, (q^(1+n-i)-1)/(q^i-1)) \\ (Indexing is that of the triangular array: 0 <= k <= n = 0,1,2,...) - M. F. Hasler, Nov 04 2012
Comments