|
| |
|
|
A203166
|
|
(n-1)-st elementary symmetric function of the first n terms of (1,2,3,4,5,1,2,3,4,5,...)=A010884.
|
|
1
|
|
|
|
1, 3, 11, 50, 274, 394, 908, 2964, 12576, 65760, 80160, 174720, 552960, 2298240, 11836800, 13564800, 28857600, 90028800, 370483200, 1893888000, 2101248000, 4409856000, 13644288000, 55821312000, 284083200000, 308966400000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..26.
|
|
|
MATHEMATICA
|
f[k_] := 1 + Mod[k + 4, 5];
t[n_] := Table[f[k], {k, 1, n}]
a[n_] := SymmetricPolynomial[n - 1, t[n]]
Table[a[n], {n, 1, 33}] (* A203166 *)
|
|
|
CROSSREFS
|
Cf. A010884, A203163.
Sequence in context: A162477 A115081 A103466 * A000254 A081048 A065048
Adjacent sequences: A203163 A203164 A203165 * A203167 A203168 A203169
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Clark Kimberling, Dec 30 2011
|
|
|
STATUS
|
approved
|
| |
|
|