%I #5 Mar 17 2014 08:17:07
%S 1,-1,-13,10,1813,-470,-161653,42070,13387093,-6278606,-5451121865,
%T 1420802350,61102622050543,-455069110262,-50154461699251,
%U 196108344641350,2099332299244083701,-109448263403739038,-2062360862658074555671,76800655398762907870
%N Numerator of Bernoulli(n, 4/9).
%H Vincenzo Librandi, <a href="/A158956/b158956.txt">Table of n, a(n) for n = 0..250</a>
%t Table[Numerator[BernoulliB[n, 4/9]], {n, 0, 50}] (* _Vincenzo Librandi_, Mar 17 2014 *)
%Y For denominators see A158808.
%K sign,frac
%O 0,3
%A _N. J. A. Sloane_, Nov 08 2009