A067815 -id:A067815 - cp's OEIS frontend

A073890 Numerator of n/floor(sqrt(n)).

1, 2, 3, 2, 5, 3, 7, 4, 3, 10, 11, 4, 13, 14, 5, 4, 17, 9, 19, 5, 21, 11, 23, 6, 5, 26, 27, 28, 29, 6, 31, 32, 33, 34, 7, 6, 37, 19, 13, 20, 41, 7, 43, 22, 15, 23, 47, 8, 7, 50, 51, 52, 53, 54, 55, 8, 57, 58, 59, 60, 61, 62, 9, 8, 65, 33, 67, 17, 69, 35, 71, 9, 73, 37, 75, 19, 77

Offset: 1

Reinhard Zumkeller, Sep 03 2002

Denominator is A075119(n).

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

Cf. A000196, A067815, A075119 (denominator).

import Data.Ratio ((%), numerator)
a073890 n = numerator $ n % a000196 n
-- Reinhard Zumkeller, Jul 08 2014

a(n) = numerator(n/sqrtint(n)); \\ Michel Marcus, Dec 19 2017

a(n) = n/A067815(n).

Denominator reference fixed by Reinhard Zumkeller, Jul 08 2014

A075119 Denominator of n/floor(sqrt(n)); numerator is A073890(n).

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 2, 1, 1, 3, 3, 1, 3, 3, 1, 1, 4, 2, 4, 1, 4, 2, 4, 1, 1, 5, 5, 5, 5, 1, 5, 5, 5, 5, 1, 1, 6, 3, 2, 3, 6, 1, 6, 3, 2, 3, 6, 1, 1, 7, 7, 7, 7, 7, 7, 1, 7, 7, 7, 7, 7, 7, 1, 1, 8, 4, 8, 2, 8, 4, 8, 1, 8, 4, 8, 2, 8, 4, 8, 1, 1, 9, 9, 3, 9, 9, 3, 9, 9, 1, 9, 9, 3, 9, 9, 3, 9, 9, 1, 1, 10, 5, 10, 5

Offset: 1

Reinhard Zumkeller, Sep 03 2002

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

Cf. A000196, A067815.

import Data.Ratio ((%), denominator)
a075119 n = denominator $ n % a000196 n
-- Reinhard Zumkeller, Jul 08 2014

A075119:=n->denom(n/floor(sqrt(n))): seq(A075119(n), n=1..100); # Wesley Ivan Hurt, Jul 07 2014

Table[Denominator[n/Floor[Sqrt[n]]], {n, 100}] (* Wesley Ivan Hurt, Jul 07 2014 *)

a(n) = A000196(n)/A067815(n).

Numerator reference corrected by Reinhard Zumkeller, Jul 08 2014

cp's OEIS Frontend

A073890 Numerator of n/floor(sqrt(n)).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

PARI

Formula

Extensions