OFFSET
1,5
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
MAPLE
MATHEMATICA
Table[Denominator[n/Floor[Sqrt[n]]], {n, 100}] (* Wesley Ivan Hurt, Jul 07 2014 *)
PROG
(Haskell)
import Data.Ratio ((%), denominator)
a075119 n = denominator $ n % a000196 n
-- Reinhard Zumkeller, Jul 08 2014
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Reinhard Zumkeller, Sep 03 2002
EXTENSIONS
Numerator reference corrected by Reinhard Zumkeller, Jul 08 2014
STATUS
approved