A172282 Squares of Bernoulli number denominators A027642.

1, 4, 36, 1, 900, 1, 1764, 1, 900, 1, 4356, 1, 7452900, 1, 36, 1, 260100, 1, 636804, 1, 108900, 1, 19044, 1, 7452900, 1, 36, 1, 756900, 1, 205119684, 1, 260100, 1, 36, 1, 3683290256100, 1, 36, 1, 183060900, 1, 3261636, 1, 476100, 1, 79524, 1, 2153888100, 1, 4356, 1, 2528100

Offset

0,2

Comments

Compare the sequence for example with A120083.

Links

Antti Karttunen, Table of n, a(n) for n = 0..4096

Formula

a(n) = A027642(n)^2 .

Mathematica

Denominator[BernoulliB[Range[0, 60]]]^2 (* Harvey P. Dale, Sep 26 2024 *)

Prog

(PARI) A172282(n) = (denominator(bernfrac(n))^2); \\ Antti Karttunen, Dec 19 2018

Crossrefs

Cf. A120083, A172298.

Sequence in context: A123745 A183882 A053426 * A120083 A110219 A174413

Adjacent sequences: A172279 A172280 A172281 * A172283 A172284 A172285

Keyword

nonn,easy

Author

Paul Curtz, Jan 30 2010

Extensions

Edited and extended by R. J. Mathar, Feb 02 2010

Status

approved