login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A012001 E.g.f.: -tan(log(cos(x))), even powers only. 1
0, 1, 2, 46, 1112, 55816, 3804272, 372397936, 47682319232, 7841034902656, 1601250315636992, 398250217200414976, 118406090377889303552, 41478295178427681104896, 16904918898000336224294912 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
COMMENTS
The highest power of 2 dividing a(n) appears to be A011371(n). The odd part starts 1, 1, 23, 139, 6977, 237767, 23274871, 372518119, 61258085177,.... - Ralf Stephan, Aug 14 2013
LINKS
EXAMPLE
-tan(log(cos(x))) = 1/2!*x^2 + 2/4!*x^4 + 46/6!*x^6 + 1112/8!*x^8 + ...
MATHEMATICA
With[{nn = 50}, Take[CoefficientList[Series[-Tan[Log[Cos[x]]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* G. C. Greubel, Apr 12 2017 *)
PROG
(PARI) a(n)={n*=2; my(x='x+O('x^(n+1))); polcoeff( serlaplace( -tan(log(cos(x)))), n); } \\ Ralf Stephan, Aug 14 2013
CROSSREFS
Sequence in context: A174592 A066555 A290046 * A012006 A279524 A264500
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Checked by N. J. A. Sloane, Dec 16 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 09:59 EDT 2024. Contains 371268 sequences. (Running on oeis4.)