A203164 - OEIS

%I #7 Oct 15 2013 14:45:27

%S 1,5,14,50,224,320,736,2400,10176,12480,27264,86400,359424,414720,

%T 884736,2764800,11390976,12718080,26763264,82944000,339738624,

%U 371589120,775028736,2388787200,9746251776,10510663680,21785739264,66886041600

%N (n-1)-st elementary symmetric function of the first n terms of the periodic sequence (4,1,2,3,4,1,2,3,...).

%F Conjecture: a(n)=48*a(n-4)-576*a(n-8) with G.f. x*(1+5*x+14*x^2+50*x^3+176*x^4+80*x^5+64*x^6) / (-1+24*x^4)^2. - _R. J. Mathar_, Oct 15 2013

%t f[k_] := 1 + Mod[k + 2, 4];

%t t[n_] := Table[f[k], {k, 1, n}]

%t a[n_] := SymmetricPolynomial[n - 1, t[n]]

%t Table[a[n], {n, 1, 33}] (* A203164 *)

%Y Cf. A010883, A203162, A203163, A203165.

%K nonn

%O 1,2

%A _Clark Kimberling_, Dec 30 2011