This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A157800 #21 Jun 27 2025 10:17:19 %S A157800 1,6,18,27,810,243,10206,2187,65610,19683,1299078,177147,483611310, %T A157800 1594323,9565938,14348907,7317942570,129140163,103053850074, %U A157800 1162261467,383546284110,10460353203,1443528742014,94143178827,257010878197710 %N A157800 Denominator of Bernoulli(n, 1/3). %H A157800 Vincenzo Librandi, <a href="/A157800/b157800.txt">Table of n, a(n) for n = 0..250</a> %t A157800 Denominator[BernoulliB[Range[0,30],1/3]] (* _Harvey P. Dale_, Nov 17 2012 *) %o A157800 (Python) %o A157800 from sympy import bernoulli, Integer %o A157800 def a(n): return bernoulli(n, 1/Integer(3)).denominator # _Indranil Ghosh_, May 01 2017 %o A157800 (PARI) a(n) = my(x=1/3); denominator(eval(bernpol(n))); \\ _Ruud H.G. van Tol_, May 10 2024 %Y A157800 For numerators see A157799. %K A157800 nonn,frac %O A157800 0,2 %A A157800 _N. J. A. Sloane_, Nov 08 2009