|
|
|
|
1, 4, 17, 136, 1666, 27200, 555152, 13596736, 388512016, 12687211520, 466101423872, 19026204891136, 854312172054016, 41847505957437440, 2220673304780705792, 126906669626284711936, 7770472824437270972416, 507503647885498965032960, 35217605908746553266470912
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 17; Table[n!, {n, 0, nn}] CoefficientList[Series[1 - Log[Cos[x] - 4*Sin[x]], {x, 0, nn}], x] (* Arkadiusz Wesolowski, Aug 17 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|