login
A012008
sec(log(cos(x)))= 1+3/4!*x^4+30/6!*x^6+1113/8!*x^8+50460/10!*x^10...
2
1, 0, 3, 30, 1113, 50460, 3693723, 359740290, 46791574833, 7721990402520, 1584990509251443, 395230316479830150, 117766463267804780553, 41313542582787780576180, 16856003114804522914769163
OFFSET
0,3
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sec[Log[Cos[x]]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jan 02 2015 *)
CROSSREFS
Sequence in context: A203469 A296590 A203478 * A335710 A341499 A203415
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved