# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a009039 Showing 1-1 of 1 %I A009039 #14 Jul 22 2018 22:53:39 %S A009039 1,-1,-3,27,2425,143031,8956533,618394579,46232494321,3608163168111, %T A009039 254307747662573,-15725973912655477,-32163339922362247575, %U A009039 -26444005741558393208281,-19705272022676306432282267 %N A009039 Expansion of E.g.f. cos(sin(tan(x))), even powers only. %H A009039 G. C. Greubel, Table of n, a(n) for n = 0..237 %t A009039 With[{nmax = 60}, CoefficientList[Series[Cos[Sin[Tan[x]]], {x, 0, nmax}], x]*Range[0, nmax]!][[1 ;; -1 ;; 2]] (* _G. C. Greubel_, Jul 22 2018 *) %o A009039 (PARI) x='x+O('x^60); v=Vec(serlaplace(cos(sin(tan(x))))); vector(#v\2,n,v[2*n-1]) \\ _G. C. Greubel_, Jul 22 2018 %K A009039 sign %O A009039 0,3 %A A009039 _R. H. Hardin_ %E A009039 Extended with signs by _Olivier GĂ©rard_, Mar 15 1997 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE