OFFSET
1,2
FORMULA
From R. J. Mathar, Jul 02 2013: (Start)
Conjecture: a(n) = 8*a(n-3) - 16*a(n-6).
Conjecture: G.f.: x*(1+4*x+8*x^2+12*x^3+16*x^4) / (-1+4*x^3)^2.
(End)
MATHEMATICA
f[k_] := 1 + Mod[k^2, 3]; t[n_] := Table[f[k], {k, 1, n}]
a[n_] := SymmetricPolynomial[n - 1, t[n]]
Table[a[n], {n, 1, 33}] (* A203167 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Dec 30 2011
STATUS
approved