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 A203237 #5 Mar 30 2012 18:58:05
%S A203237 1,7,59,660,9280,148300,2805900,58575000,1396365000,37435710000,
%T A203237 1077585600000,34227953760000,1189257232800000,43680491749440000,
%U A203237 1734759507499200000,72342732649037760000,3233001543062054400000
%N A203237 (n-1)-st elementary symmetric function of the first n terms of the upper Wythoff sequence, A001950.
%t A203237 f[k_] := k + Floor[GoldenRatio*k]
%t A203237 t[n_] := Table[f[k], {k, 1, n}]
%t A203237 a[n_] := SymmetricPolynomial[n - 1, t[n]]
%t A203237 Table[a[n], {n, 1, 18}] (* A203237 *)
%t A203237 t[16] (* A001950 *)
%Y A203237 Cf. A203236.
%K A203237 nonn
%O A203237 1,2
%A A203237 _Clark Kimberling_, Dec 30 2011