A157800 Denominator of Bernoulli(n, 1/3).

1, 6, 18, 27, 810, 243, 10206, 2187, 65610, 19683, 1299078, 177147, 483611310, 1594323, 9565938, 14348907, 7317942570, 129140163, 103053850074, 1162261467, 383546284110, 10460353203, 1443528742014, 94143178827, 257010878197710

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..250

Mathematica

Denominator[BernoulliB[Range[0, 30], 1/3]] (* Harvey P. Dale, Nov 17 2012 *)

Prog

(Python)
from sympy import bernoulli, Integer
def a(n): return bernoulli(n, 1/Integer(3)).denominator() # Indranil Ghosh, May 01 2017
(PARI) a(n) = my(x=1/3); denominator(eval(bernpol(n))); \\ Ruud H.G. van Tol, May 10 2024

Crossrefs

For numerators see A157799.

Sequence in context: A028558 A337324 A140450 * A355228 A352061 A225110

Adjacent sequences: A157797 A157798 A157799 * A157801 A157802 A157803

Keyword

nonn,frac

Author

N. J. A. Sloane, Nov 08 2009

Status

approved