%I #36 Sep 08 2022 08:44:53
%S 1,0,1,3,2,10,16,28,72,120,256,528,992,2080,4096,8128,16512,32640,
%T 65536,131328,261632,524800,1048576,2096128,4196352,8386560,16777216,
%U 33558528,67100672,134225920,268435456,536854528,1073774592
%N Number of elements of GF(2^n) with trace 0 and subtrace 1.
%H Colin Barker, <a href="/A038519/b038519.txt">Table of n, a(n) for n = 0..1000</a>
%H F. Ruskey, <a href="http://combos.org/TSpoly">Number of irreducible polynomials over GF(2) with given trace and subtrace</a>
%H F. Ruskey, <a href="http://combos.org/TSGF2">Number of elements of GF(2^n) with given trace and subtrace</a>
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (0,2,4).
%F a(n) = C(n, r+0) + C(n, r+4) + C(n, r+8) + ... where r = 2 if n odd, r = 0 if n even.
%F From _Colin Barker_, Aug 02 2019: (Start)
%F G.f.: (1 - x^2 - x^3) / ((1 - 2*x)*(1 + 2*x + 2*x^2)). - _Creighton Dement_, Apr 29 2005, corrected by _Colin Barker_, Aug 02 2019
%F a(n) = ((-1-i)^n + (-1+i)^n + 2^n) / 4 for n>0.
%F a(n) = 2*a(n-2) + 4*a(n-3) for n>3.
%F (End)
%o (PARI) Vec((1 - x^2 - x^3) / ((1 - 2*x)*(1 + 2*x + 2*x^2)) + O(x^40)) \\ _Colin Barker_, Aug 02 2019
%o (Magma) I:=[1,0,1,3]; [m le 4 select I[m] else 2*Self(m-2)+4*Self(m-3):m in [1..33]]; // _Marius A. Burtea_, Aug 02 2019
%Y Cf. A038503, A038505, A038518, A038520, A038521.
%K easy,nonn
%O 0,4
%A _Frank Ruskey_