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 A024180 #36 Jan 09 2024 16:05:21
%S A024180 0,2,3,5,7,10,13,16,20,24,28,32,37,42,48,54,60,67,74,81,88,96,104,113,
%T A024180 122,131,141,151,161,171,182,193,205,217,229,242,255,268,281,295,309,
%U A024180 324,339,354,370,386,402,418,435,452,470,488
%N A024180 a(n) = floor((3rd elementary symmetric function of 2,3,...,n+3) / (2nd elementary symmetric function of 2,3,...,n+3) ).
%H A024180 Ivan Neretin, <a href="/A024180/b024180.txt">Table of n, a(n) for n = 1..10000</a>
%F A024180 Empirical g.f.: -x^2*(x^10-2*x^9+x^7+x^4+x^2-x+2) / ((x-1)^3*(x^2+x+1)*(x^6+x^3+1)). - _Colin Barker_, Aug 16 2014
%F A024180 a(n) = floor(A001702(n+1)/A001701(n+2)). - _R. J. Mathar_, Sep 23 2016
%F A024180 a(n) = floor((1/2)*n*(5+n)*(n^2 + 9*n + 22)/(3*n^2 + 29*n + 72)). - _Ivan Neretin_, May 21 2018
%t A024180 s[n_] := 1 + Range[n + 2]
%t A024180 Table[Floor[SymmetricPolynomial[3, s[n]]/SymmetricPolynomial[2, s[n]]], {n, 1,
%t A024180 46}] (* _Clark Kimberling_, Sep 23 2016 *)
%K A024180 nonn
%O A024180 1,2
%A A024180 _Clark Kimberling_
%E A024180 Definition corrected by _R. J. Mathar_, Sep 23 2016