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.

A203155 (n-1)-st elementary symmetric function of {3, 3, 4, 4, 5, 5,..., Floor[(n+5)/2]}.

This page as a plain text file.
%I A203155 #8 Nov 28 2017 11:35:56
%S A203155 1,6,33,168,984,5640,37440,246240,1853280,13880160,117391680,
%T A203155 989936640,9315855360,87500528640,907925760000,9408462336000,
%U A203155 106785133056000,1210848984576000,14928525545472000,183922359312384000,2448351304261632000
%N A203155 (n-1)-st elementary symmetric function of {3, 3, 4, 4, 5, 5,..., Floor[(n+5)/2]}.
%e A203155 Let esf abbreviate "elementary symmetric function".  Then
%e A203155 0th esf of {3}:  1
%e A203155 1st esf of {3,3}:  3+3=6
%e A203155 2nd esf of {3,3,4} is 3*3+3*4+3*4=33
%t A203155 f[k_] := Floor[(k + 5)/2]; t[n_] := Table[f[k], {k, 1, n}]
%t A203155 a[n_] := SymmetricPolynomial[n - 1, t[n]]
%t A203155 Table[a[n], {n, 1, 22}]  (* A203155 *)
%Y A203155 Cf. A203152, A203153, A203154.
%K A203155 nonn
%O A203155 1,2
%A A203155 _Clark Kimberling_, Dec 29 2011