# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a013029 Showing 1-1 of 1 %I A013029 #7 Feb 24 2012 12:51:16 %S A013029 2,-16,770,-92496,20740610,-7474383376,3950577954050, %T A013029 -2879011223666256,2766724614020441090,-3389992164431254725136, %U A013029 5158145935254382213801730,-9542165281823577542150984016 %N A013029 E.g.f. (in x^2) is arctan(sinh(x)+sin(x)) %t A013029 Partition[CoefficientList[Series[ArcTan[Sinh[x] + Sin[x]], {x, 0, 23}], x]*Range[0, 23]!, 2][[All,2]] %o A013029 (PARI) x='x+O('x^33) /* That many terms */ %o A013029 v=Vec(serlaplace(atan(sin(x)+sinh(x)))); /* every second term is zero */ %o A013029 vector(#v\2,n,v[2*n-1]) /* show terms */ %o A013029 /* Joerg Arndt, Mar 16 2011 */ %K A013029 sign %O A013029 0,1 %A A013029 Patrick Demichel (patrick.demichel(AT)hp.com) # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE