This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A054483 #19 Jun 01 2025 18:38:07 %S A054483 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, %T A054483 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, %U A054483 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 %N A054483 Numerator of lowest terms fraction from division of a highly composite number (1) by its predecessor. %C A054483 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. %H A054483 Michael De Vlieger, <a href="/A054483/b054483.txt">Table of n, a(n) for n = 2..10000</a> %H A054483 Michael De Vlieger, <a href="https://oeis.org/A054482/a054482.png">Logarithmic scatterplot of a(n)/A054482(n)</a>, n = 2..4096. %F A054483 a(n) = A002182(n)/A054481(n). %e A054483 a(7)=3 since A002182(7)=36, A002182(6)=24 and 36/24=3/2 in lowest terms. %t A054483 s = Import["https://oeis.org/A002182/b002182.txt", "Data"][[All, -1]]; Array[Numerator[s[[# + 1]]/s[[#]]] &, 120] (* _Michael De Vlieger_, Oct 11 2023 *) %Y A054483 Cf. A002182, A054482. %K A054483 easy,nonn,frac %O A054483 2,1 %A A054483 _Henry Bottomley_, Mar 31 2000 %E A054483 More terms from _Jud McCranie_, Jun 11 2005