%I #8 Mar 18 2014 03:35:31

%S 1,-1,-13,21,323,-1141,-157531,123361,3107843,-22584681,-7737133583,

%T 6298701101,21361359585233,-2489518886621,-108166545951373,

%U 1324340625653241,1117741969306140211,-912462507809610961,-6777866017304661816769,790465529030548467781

%N Numerator of Bernoulli(n, 3/10).

%H Vincenzo Librandi, <a href="/A158998/b158998.txt">Table of n, a(n) for n = 0..250</a>

%t Table[Numerator[BernoulliB[n, 3/10]], {n, 0, 50}] (* _Vincenzo Librandi_, Mar 17 2014 *)

%Y For denominators see A158994.

%K sign,frac

%O 0,3

%A _N. J. A. Sloane_, Nov 08 2009