|
|
|
|
1, 3, 10, 60, 560, 6960, 108160, 2016960, 43880960, 1091055360, 30518978560, 948529167360, 32428291727360, 1209444693749760, 48866368072744960, 2126271870148853760, 99126722911299829760, 4929370112679276380160, 260448010952742716047360, 14570492989330164551516160
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 18; Table[n!, {n, 0, nn}] CoefficientList[Series[1 - Log[Cos[x] - 3*Sin[x]], {x, 0, nn}], x] (* Arkadiusz Wesolowski, Aug 17 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|