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 A009337 #19 Jun 22 2015 22:17:12
%S A009337 0,1,-3,7,-16,40,-117,411,-1720,8384,-46561,289595,-1991504,14993108,
%T A009337 -122595085,1081616659,-10239597968,103522029312,-1113074512289,
%U A009337 12681693805203,-152613117638712,1934275341388596,-25753344727083773
%N A009337 Expansion of e.g.f.: log(1+sin(x))/exp(x).
%C A009337 This sequence starting with the 2nd term, unsigned, is the partial sums of A000667. - _Gerald McGarvey_, Aug 13 2004
%F A009337 a(n) ~ (n-1)! * (-1)^(n+1) * exp(Pi/2) * 2^(n+1) / Pi^n. - _Vaclav Kotesovec_, Jan 23 2015
%t A009337 With[{nn=30},CoefficientList[Series[Log[1+Sin[x]]/Exp[x],{x,0,nn}], x] Range[0,nn]!] (* _Harvey P. Dale_, Aug 13 2012 *)
%Y A009337 Cf. A000667.
%K A009337 sign,easy
%O A009337 0,3
%A A009337 _R. H. Hardin_
%E A009337 Extended with signs by _Olivier Gérard_, Mar 15 1997
%E A009337 Definition clarified by _Harvey P. Dale_, Aug 13 2012