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 A368620 #24 Jan 12 2024 22:22:00
%S A368620 3,87,878,2721,49171,566827,9242691,28245729,848456353
%N A368620 a(n) is the n-digit numerator of the fraction h/k with h and k coprime positive integers at which abs(h/k-e) is minimal.
%C A368620 a(3) = 878 corresponds to the numerator of A368617.
%H A368620 <a href="/index/Ea">Index entries for sequences related to the number e</a>
%e A368620 n fraction approximated value
%e A368620 - ------------------- ------------------
%e A368620 1 3/1 3
%e A368620 2 87/32 2.71875
%e A368620 3 878/323 2.7182662538699...
%e A368620 4 2721/1001 2.7182817182817...
%e A368620 5 49171/18089 2.7182818287356...
%e A368620 6 566827/208524 2.7182818284705...
%e A368620 7 9242691/3400196 2.7182818284593...
%e A368620 8 28245729/10391023 2.7182818284590...
%e A368620 ...
%t A368620 a[1]=3; a[n_]:=Module[{minim=Infinity},For[i = 10^(n - 1), i <= 10^n - 1, i++, For[j = Floor[i/E], j <= Ceiling[i/E], j++, If[(dist = Abs[i/j - E]) < minim && GCD[i, j] == 1, minim = dist; hmin = i]]]; hmin]; Array[a,9]
%Y A368620 Cf. A001113, A368617, A368621 (denominator), A368659.
%Y A368620 Cf. A007676, A007677, A368618, A368619.
%K A368620 nonn,base,frac,more
%O A368620 1,1
%A A368620 _Stefano Spezia_, Jan 01 2024