A054483 Numerator of lowest terms fraction from division of a highly composite number (1) by its predecessor.

2, 2, 3, 2, 2, 3, 4, 5, 2, 3, 4, 3, 2, 7, 3, 4, 3, 2, 3, 4, 3, 4, 5, 11, 18, 10, 11, 3, 4, 3, 4, 5, 6, 3, 10, 6, 13, 3, 4, 3, 4, 5, 6, 3, 10, 6, 5, 4, 6, 5, 3, 17, 20, 17, 6, 3, 10, 6, 5, 4, 6, 5, 3, 19, 20, 3, 19, 3, 20, 19, 6, 5, 4, 6, 5, 3, 4, 3, 4, 3, 7, 46, 105, 23, 28, 46, 105, 23, 3, 28, 23, 3

Offset

2,1

Comments

Successive fractions are 2/1,2/1,3/2,2/1,2/1,3/2,4/3,5/4,2/1,3/2,4/3,3/2,2/1 a(n) is frequently A054482(n)+1, though not for example for n=26.

Links

Michael De Vlieger, Table of n, a(n) for n = 2..10000

Michael De Vlieger, Logarithmic scatterplot of a(n)/A054482(n), n = 2..4096.

Formula

a(n) = A002182(n)/A054481(n)

Example

a(7)=3 since A002182(7)=36, A002182(6)=24 and 36/24=3/2 in lowest terms.

Mathematica

s = Import["https://oeis.org/A002182/b002182.txt", "Data"][[All, -1]]; Array[Numerator[s[[# + 1]]/s[[#]]] &, 120] ] (* Michael De Vlieger, Oct 11 2023 *)

Crossrefs

Cf. A002182, A054482.

Sequence in context: A182093 A254618 A268672 * A258568 A108939 A370835

Adjacent sequences: A054480 A054481 A054482 * A054484 A054485 A054486

Keyword

easy,nonn,frac

Author

Henry Bottomley, Mar 31 2000

Extensions

More terms from Jud McCranie, Jun 11 2005

Status

approved