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 A090973 #25 Jan 14 2025 01:51:12
%S A090973 2,2,2,2,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,5,5,5,5,
%T A090973 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
%U A090973 6,5,5,5,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6
%N A090973 a(n) = ceiling(prime(n)/n).
%H A090973 G. C. Greubel, <a href="/A090973/b090973.txt">Table of n, a(n) for n = 1..10000</a>
%F A090973 For n > 1, a(n) = A038605(n)+1. - _David Wasserman_, Feb 23 2006
%F A090973 a(A038606(n)) = n+1. - _Reinhard Zumkeller_, Aug 16 2009
%e A090973 a(12) = 4 as pi(48) = 15 > 12 > pi(36) = 11.
%t A090973 Table[Ceiling[Prime[n]/n], {n, 1, 120}] (* _G. C. Greubel_, Feb 02 2019 *)
%o A090973 (PARI) vector(120, n, ceil(prime(n)/n)) \\ _G. C. Greubel_, Feb 02 2019
%o A090973 (Magma) [Ceiling(NthPrime(n)/n): n in [1..120]]; // _G. C. Greubel_, Feb 02 2019
%o A090973 (Sage) [ceil(nth_prime(n)/n) for n in (1..120)] # _G. C. Greubel_, Feb 02 2019
%Y A090973 Cf. A038605, A038606.
%Y A090973 Cf. A068901. - _Reinhard Zumkeller_, Aug 16 2009
%K A090973 nonn,easy
%O A090973 1,1
%A A090973 _Amarnath Murthy_, Jan 04 2004
%E A090973 More terms from _David Wasserman_, Feb 23 2006