|
|
|
|
1, 2, 5, 20, 130, 1120, 12080, 156320, 2360080, 40721920, 790465280, 17048837120, 404482209280, 10468697374720, 293526944276480, 8863147657809920, 286741939970836480, 9895168120066539520, 362814031120908615680, 14085379571459949854720, 577210378447729271111680
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 19; Table[n!, {n, 0, nn}] CoefficientList[Series[1 - Log[Cos[x] - 2*Sin[x]], {x, 0, nn}], x] (* Arkadiusz Wesolowski, Aug 17 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|