A203236 (n-1)-st elementary symmetric function of the first n terms of the lower Wythoff sequence, A000201.

1, 4, 19, 126, 1080, 10296, 118440, 1478304, 21380544, 351668736, 6131649024, 119107100160, 2550758708736, 57156393305088, 1394626877005824, 35414634429554688, 969919192208203776, 28498206264514043904, 865692128959229214720

Offset

1,2

Links

Table of n, a(n) for n=1..19.

Mathematica

f[k_] := Floor[GoldenRatio*k]
t[n_] := Table[f[k], {k, 1, n}]
a[n_] := SymmetricPolynomial[n - 1, t[n]]
Table[a[n], {n, 1, 18}]     (* A203236 *)
t[16]  (* A000201 *)

Crossrefs

Cf. A203237.

Sequence in context: A377967 A099953 A009324 * A365961 A103468 A192944

Adjacent sequences: A203233 A203234 A203235 * A203237 A203238 A203239

Keyword

nonn

Author

Clark Kimberling, Dec 30 2011

Status

approved