%I #10 May 22 2020 15:41:51
%S 0,1,1,1,1,-3,-11,-23,-39,-43,-3,129,417,877,1349,1305,-407,-5627,
%T -16243,-32079,-46287,-37987,35285,236873,623609,1162293,1559837,
%U 1009889,-2034495,-9728051,-23660955,-41633415,-51467895,-22390171,101331373,391586577,887713361,1473400829,1653762805,267778473,-4669059303,-15499500395
%N Expansion of Re(x/(1-x-2*i*x^2)), i=sqrt(-1).
%C Imaginary part is A106202.
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,-1,0,-4)
%F G.f.: x*(1-x)/(1-2*x+x^2+4*x^4).
%F a(n) = sum(k=0..floor((n-1)/2), C(n-k-1, k)*2^k*cos(pi*k/2) ).
%t LinearRecurrence[{2,-1,0,-4},{0,1,1,1},50] (* _Harvey P. Dale_, May 22 2020 *)
%Y Cf. A104862, A014292.
%K easy,sign
%O 0,6
%A _Paul Barry_, Apr 25 2005
|