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 A203236 #5 Mar 30 2012 18:58:05 %S A203236 1,4,19,126,1080,10296,118440,1478304,21380544,351668736,6131649024, %T A203236 119107100160,2550758708736,57156393305088,1394626877005824, %U A203236 35414634429554688,969919192208203776,28498206264514043904,865692128959229214720 %N A203236 (n-1)-st elementary symmetric function of the first n terms of the lower Wythoff sequence, A000201. %t A203236 f[k_] := Floor[GoldenRatio*k] %t A203236 t[n_] := Table[f[k], {k, 1, n}] %t A203236 a[n_] := SymmetricPolynomial[n - 1, t[n]] %t A203236 Table[a[n], {n, 1, 18}] (* A203236 *) %t A203236 t[16] (* A000201 *) %Y A203236 Cf. A203237. %K A203236 nonn %O A203236 1,2 %A A203236 _Clark Kimberling_, Dec 30 2011