|
|
A279308
|
|
Numerators of coefficients in expansion of (1 + cos(sqrt x))/(cosh x).
|
|
2
|
|
|
2, -1, -23, 179, 15961, -375481, -77012099, 3667756091, 1363652668561, -109208405349361, -64265858394905339, 7770701878340584259, 6642366922974433027609, -102726453588460111393691, -1322873751136125749373458099, 15853417688720458694222368361
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
(2/1) - (1/2)x - (23/24)x^2 + (179/720)x^3 + ... ; 0/1, -1/2, -23/24, 179/720, ... = A279308/A279309.
|
|
MATHEMATICA
|
z = 30; t = CoefficientList[Series[(1 + Cos[Sqrt[x]])/Cosh[x], {x, 0, z}], x];
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,sign,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|