cp's OEIS Frontend

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.

A203192 (n-1)-st elementary symmetric function of the first n terms of (1,2,1,4,1,6,1,8,...)=(A124625 for n>1).

This page as a plain text file.
%I A203192 #6 Mar 30 2012 18:58:05
%S A203192 1,3,5,22,30,188,236,1936,2320,23584,27424,332928,379008,5352192,
%T A203192 5997312,96602112,106924032,1934954496,2120749056,42600775680,
%U A203192 46316666880,1022682562560,1104432168960,26588121661440,28550112215040
%N A203192 (n-1)-st elementary symmetric function of the first n terms of (1,2,1,4,1,6,1,8,...)=(A124625 for n>1).
%t A203192 f[k_] := If[Mod[k, 2] == 1, 1, k];
%t A203192 t[n_] := Table[f[k], {k, 1, n}]
%t A203192 a[n_] := SymmetricPolynomial[n - 1, t[n]]
%t A203192 Table[a[n], {n, 1, 33}] (* A203192 *)
%Y A203192 Cf. A124625.
%K A203192 nonn
%O A203192 1,2
%A A203192 _Clark Kimberling_, Dec 30 2011