|
%I #9 Jul 06 2017 16:06:42
%S 1,10,150,125,3750,3125,656250,78125,2343750,1953125,644531250,
%T 48828125,133300781250,1220703125,36621093750,30517578125,
%U 15563964843750,762939453125,3044128417968750,19073486328125,6294250488281250
%N Denominator of Bernoulli(n, 1/5).
%H Vincenzo Librandi, <a href="/A157867/b157867.txt">Table of n, a(n) for n = 0..250</a>
%t Table[Denominator[BernoulliB[n, 1/5]], {n, 0, 50}] (* _Vincenzo Librandi_, Mar 19 2014 *)
%o (PARI) a(n)=denominator(subst(bernpol(n, x), x, 1/5)); \\ _Michel Marcus_, Jul 06 2017
%Y For numerators see A157866.
%K nonn,frac
%O 0,2
%A _N. J. A. Sloane_, Nov 08 2009
|
