|
|
A015197
|
|
Sum of Gaussian binomial coefficients for q=11.
|
|
2
|
|
|
1, 2, 14, 268, 19156, 3961832, 3092997464, 7024809092848, 60287817008722576, 1505950784990730735392, 142158530752430089391520224, 39060769254069395008311334483648, 40559566021977397260316290099710383936
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
REFERENCES
|
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.
I. P. Goulden and D. M. Jackson, Combinatorial Enumeration. Wiley, NY, 1983, p. 99.
M. Sved, Gaussians and binomials, Ars. Combinatoria, 17A (1984), 325-351.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 2*a(n-1)+(11^(n-1)-1)*a(n-2), (Goldman + Rota, 1969). - Vaclav Kotesovec, Aug 21 2013
a(n) ~ c * 11^(n^2/4), where c = EllipticTheta[3,0,1/11]/QPochhammer[1/11,1/11] = 1.312069129398... if n is even and c = EllipticTheta[2,0,1/11]/QPochhammer[1/11,1/11] = 1.2291712170215... if n is odd. - Vaclav Kotesovec, Aug 21 2013
|
|
MATHEMATICA
|
Total/@Table[QBinomial[n, m, 11], {n, 0, 20}, {m, 0, n}] (* Vincenzo Librandi, Nov 02 2012 *)
Flatten[{1, RecurrenceTable[{a[n]==2*a[n-1]+(11^(n-1)-1)*a[n-2], a[0]==1, a[1]==2}, a, {n, 1, 15}]}] (* Vaclav Kotesovec, Aug 21 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|