OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..70
MAPLE
c:= proc(m) option remember;
1/(m+1)! - add((-1)^i/(2*i+1)!*c(m-2*i), i=1..floor((m+1)/2))
end proc;
c(-1):= 1;
A007451:= denom @ c; # Robert Israel, Apr 13 2014
MATHEMATICA
Denominator[CoefficientList[Series[Exp[x]/Sin[x], {x, 0, 20}], x]]//Quiet (* Harvey P. Dale, Mar 16 2018 *)
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
STATUS
approved