A335952 Denominators of the Faulhaber polynomials.

1, 1, 1, 3, 3, 5, 3, 105, 3, 45, 105, 165, 45, 273, 7, 15, 231, 1785, 9, 25935, 105, 3465, 1155, 2415, 315, 16575, 429, 1485, 399, 435, 45, 465465, 2145, 8415, 41055, 525, 1485, 10555545, 57057, 585, 105, 268345, 19635, 18723705, 15015

Offset: 0

Author

Peter Luschny, Jul 16 2020

Keywords

• nonn
• frac

Comments

See A335951 for comments, programs and references.

Crossrefs

Cf. A335951 (numerators).

Programs

Python

from math import lcm
from sympy import simplify, sqrt, bernoulli
from sympy.abc import x
def A335952(n): return lcm(*(d.q for d in simplify((bernoulli(2*n,(sqrt(8*x+1)+1)/2)-bernoulli(2*n,1))/(2*n)).as_poly().all_coeffs())) # Chai Wah Wu, May 17 2022