A061046 Denominator of 1/36 - 1/n^2.

36, 9, 12, 144, 900, 1, 1764, 576, 324, 225, 4356, 48, 6084, 441, 300, 2304, 10404, 81, 12996, 3600, 196, 1089, 19044, 192, 22500, 1521, 2916, 7056, 30276, 75, 34596, 9216, 484, 2601, 44100, 1296, 49284, 3249, 2028, 14400, 60516, 147, 66564, 17424, 8100, 4761, 79524, 256, 86436, 5625, 3468, 24336, 101124, 729, 108900, 28224, 4332, 7569, 125316, 400, 133956, 8649, 15876, 36864, 152100, 363, 161604, 41616, 6348, 11025, 181476, 5184

Offset: 1

Author

N. J. A. Sloane, May 26 2001

Keywords

• nonn
• frac

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

See A061045 for numerators and further information. Cf. A061035-A061050.

Programs

Haskell

import Data.Ratio ((%), denominator)
a061046 = denominator . (1 % 36 -) . recip . (^ 2) . fromIntegral
-- Reinhard Zumkeller, Jan 06 2014

Mathematica

Denominator[1/36-1/Range[80]^2] (* Harvey P. Dale, Feb 06 2012 *)

PARI

for(n=6,50, print1(denominator(1/6^2 - 1/n^2), ", ")) \\ G. C. Greubel, Jul 07 2017