|
%I M3547 #20 Feb 16 2015 09:51:00
%S 0,1,-1,4,-18,110,-810,7040,-70280,792200,-9945000,137550400,
%T -2077719600,34026132400,-600433397200,11356783360000,
%U -229193571984000,4915556301968000,-111644265232656000,2676908220027392000
%N Expansion of tan(log(1+x)).
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H Vincenzo Librandi, <a href="/A003708/b003708.txt">Table of n, a(n) for n = 0..200</a>
%F a(n) ~ n! / (exp(Pi/2) * (exp(-Pi/2)-1)^(n+1)). - _Vaclav Kotesovec_, Feb 16 2015
%t With[{nn=20},CoefficientList[Series[Tan[Log[1+x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 28 2013 *)
%K sign
%O 0,4
%A _R. H. Hardin_, _Simon Plouffe_
|
