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 A107610 #16 Aug 21 2021 13:13:39 %S A107610 2,16,56,190,556,1821,4928,14136,39017,107405,291330,791513,2148323, %T A107610 5797898,15726486,42605113,115371428,312629484,847000031,2295700537, %U A107610 6223257066,16874397811,45764114391,124142354193,336811260666 %N A107610 Least number k such that round(k/pi(k)) = n. %C A107610 a(n) is the index of the first occurrence of n in A107609. %C A107610 Lim_{n->infinity} a(n+1)/a(n) ~ e. %F A107610 a(n) = min { k >= 2 : round(k/pi(k)) = n }. %e A107610 a(2) = 16 because round(16/pi(16)) = round(16/6) = 3 and for no number less than 16 does the quotient equal 3. %t A107610 f[n_] := Round[ n / PrimePi[ n]]; g[2] = 2; g[n_] := g[n] = Block[{k = PrimePi[E g[n - 1]]}, While[ f[k] < n, k++ ]; k]; Do[ Print[ g[ n]], {n, 2, 26}] %Y A107610 Cf. A000720, A107609, A107614, A272231. %K A107610 nonn %O A107610 2,1 %A A107610 _Jonathan Vos Post_ and _Robert G. Wilson v_, May 17 2005