STATUS
editing
approved
The OEIS is supported by the many generous donors to the OEIS Foundation.
Revision History for A170696
(Bold, blue-underlined text is an addition; faded, red-underlined text is aShowing entries 1-10 | older changes
Number of reduced words of length n in Coxeter group on 15 generators S_i with relations (S_i)^2 = (S_i S_j)^50 = I.
(history; published version)
(history; published version)
LINKS
<a href="/index/Rec#order_50">Index entries for linear recurrences with constant coefficients</a>, signature (13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, -91).
STATUS
approved
editing
AUTHOR
_John Cannon (john(AT)maths.usyd.edu.au) _ and N. J. A. Sloane, Dec 03 2009
STATUS
reviewed
approved
STATUS
proposed
reviewed
STATUS
editing
proposed
FORMULA
13*t + 1).
MATHEMATICA
With[{num = Total[2 t^Range[49]] + t^50 + 1, den = Total[-13 t^Range[49]] + 91t91 t^50 + 1}, CoefficientList[Series[num/den, {t, 0, 20}], t]] (* _Vincenzo Librandi _, _, Dec 08 2012 *)
STATUS
proposed
editing
STATUS
editing
proposed
COMMENTS
About the initial comment, first disagreement is at index 50 and the difference is 105. - Vincenzo Librandi, Dec 08 2012
LINKS
Vincenzo Librandi, <a href="/A170696/b170696.txt">Table of n, a(n) for n = 0..200</a>
MATHEMATICA
With[{num = Total[2 t^Range[49]] + t^50 + 1, den = Total[-13 t^Range[49]] + 91t^50 + 1}, CoefficientList[Series[num/den, {t, 0, 20}], t]] (* _Vincenzo Librandi _, Dec 08 2012 *)
STATUS
approved
editing
AUTHOR
John Cannon (john(AT)maths.usyd.edu.au) and _N. J. A. Sloane (njas(AT)research.att.com), _, Dec 03 2009