The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A197130 Sum of reflection (or absolute) lengths of all elements in the Coxeter group of type B_n 1
 1, 10, 100, 1136, 14816, 220032, 3679488, 68548608, 1409347584, 31717048320, 775808778240, 20499651624960, 582040706088960, 17674457139118080, 571655258741145600, 19621314364126003200, 712374154997583052800, 27277192770051951820800 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 REFERENCES P. Renteln, The distance spectra of Cayley graphs of Coxeter groups, Discrete Math., 311 (2011), 738-755. LINKS B. Foster-Greenwood, C. Kriloff, Spectra of Cayley Graphs of Complex Reflection Groups, arXiv preprint arXiv:1502.07392, 2015 FORMULA a(n)=Sum_{w in W(B_n)} l_T(w)=|W(B_n)|Sum_{i=1}^n (d_i-1)/d_i=2^n*n!*(1/2+3/4+...+(2n-1)/(2n)) where T=all reflections in W(B_n), l_T(1)=0 and otherwise l_T(w)=min{k|w=t_1*...*t_k for t_i in T}, and d_1,...,d_n are the degrees of W(B_n) EXAMPLE a(2)=10 since W(B_2)={1, t_1=s_1, t_2=s_2, t_3=s_1*s_2*s_1, t_4=s_2*s_1*s_2, t_1*t_2=s_1*s_2, t_2*t_1=s_2*s_1, t_1*t_4=s_1*s_2*s_1*s_2} in terms of simple reflections s_1 and s_2. MAPLE seq(2^n*factorial(n)*add((2*k-1)/(2*k), k=1..n), n=1..100); MATHEMATICA Table[2^n*Factorial[n]*Sum[(2*k-1)/(2*k), {k, 1, n}], {n, 1, 100}] PROG (Python) [2^n*factorial(n)*sum([(2*k-1)/(2*k) for k in [1..n]]) for n in [1..100]] CROSSREFS Cf. A067318, A197131. Sequence in context: A278899 A278916 A279016 * A249458 A249457 A173482 Adjacent sequences:  A197127 A197128 A197129 * A197131 A197132 A197133 KEYWORD easy,nonn AUTHOR Cathy Kriloff, Oct 10 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 1 14:52 EDT 2020. Contains 333163 sequences. (Running on oeis4.)