%I #9 Jul 31 2015 18:21:32
%S 1,0,4,0,48,160,-256,0,-1792,-7680,16384,0,135168,532480,-1048576,0,
%T -8323072,-33423360,67108864,0,537919488,2149580800,-4294967296,0,
%U -34342961152,-137405399040,274877906944,0,2199291691008,8796629893120,-17592186044416,0,-140733193388032,-562941363486720
%N Row sums of triangle A118438.
%H <a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (2, -4, 8, -64, 128, -256, 512).
%F G.f.: (1-2*x+8*x^2-16*x^3+128*x^4-96*x^5+128*x^6-256*x^7)/(1-2*x)/(1+4*x^2)/(1+64*x^4).
%t CoefficientList[Series[(1-2x+8x^2-16x^3+128x^4-96x^5+128x^6-256x^7)/ (1-2x)/(1+4x^2)/(1+64x^4),{x,0,50}],x] (* or *) Join[{1}, LinearRecurrence[ {2,-4,8,-64,128,-256,512},{0,4,0,48,160,-256,0},50]] (* _Harvey P. Dale_, Apr 30 2011 *)
%o (PARI) {a(n)=polcoeff((1-2*x+8*x^2-16*x^3+128*x^4-96*x^5+128*x^6-256*x^7)/(1-2*x)/(1+4*x^2)/(1+64*x^4+x*O(x^n)),n)}
%Y Cf. A118438 (triangle), A118439 (column 0); A118437 (row sums of inverse).
%K sign
%O 0,3
%A _Paul D. Hanna_, Apr 28 2006