This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A089011 #15 Dec 26 2018 16:53:42 %S A089011 1,0,0,0,1,0,1,0,1,0,1,0,1,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, %T A089011 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, %U A089011 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 %N A089011 a(n) = 1 if n is an exponent of the Weyl group W(E_7), 0 otherwise. %C A089011 The exponents are 1, 5, 7, 9, 11, 13, 17. The point of this sequence is that a similar generating function gives the exponents for any finite Coxeter group. %H A089011 Antti Karttunen, <a href="/A089011/b089011.txt">Table of n, a(n) for n = 1..10000</a> %H A089011 <a href="/index/Ch#char_fns">Index entries for characteristic functions</a> %F A089011 Euler transform of length 14 sequence [ 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1, 0, -1]. - _Michael Somos_, Mar 07 2007 %F A089011 G.f.: x*(1-x^12)*(1-x^14)/((1-x^4)*(1-x^6)). %o A089011 (PARI) {a(n)=if(n<1, 0, polcoeff( x^17+x^13+x^11+x^9+x^7+x^5+x, n))} /* _Michael Somos_, Mar 07 2007 */ %Y A089011 Cf. A005763, A089010. %K A089011 easy,nonn %O A089011 1,1 %A A089011 _Paul Boddington_, Nov 03 2003