OFFSET
0,1
COMMENTS
This autosequence (a sequence which has its inverse binomial transform equal to the signed sequence) is related to Bernoulli and Euler numbers. For more details, see A237425.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
MATHEMATICA
b[0] = 2; b[1] = 1; b[n_] := BernoulliB[n] + EulerE[n, 1]/2^IntegerExponent[n, 2]; a[n_] := Numerator[b[n]]; Table[a[n], {n, 0, 55}]
CROSSREFS
KEYWORD
sign,frac
AUTHOR
Jean-François Alcover and Paul Curtz, Feb 24 2014
STATUS
approved