OFFSET
0,3
COMMENTS
"Bernoulli numbers" for x/[1-T(3,x)].
FORMULA
D-finite with recurrence a(n) +(n+4)*a(n-1) -2*n*(n-1)*a(n-2) -4*(n-1)*(n-2)*a(n-3)=0. - R. J. Mathar, Aug 20 2021
MAPLE
G:=x/(1+3*x-4*x^3): Gser:=series(G, x=0, 23): 0, seq(n!*coeff(Gser, x^n), n=1..20); # yields the signed sequence
MATHEMATICA
g[x_] = x/(-1 + ChebyshevT[3, x]) h[x_, n_] = Dt[g[x], {x, n}] a[x_] = Table[h[x, n], {n, 0, 50}]; b = a[0]
CROSSREFS
KEYWORD
sign
AUTHOR
Roger L. Bagula, Jun 28 2005
STATUS
approved