|
%I #19 Dec 07 2016 03:22:05
%S 0,1,2,6,17,43,100,220,467,969,1982,4018,8101,16279,32648,65400,
%T 130919,261973,524098,1048366,2096921,4194051,8388332,16776916,
%U 33554107,67108513,134217350,268435050,536870477,1073741359
%N Expansion of x(1-3x+5x^2-2x^3)/((1-x)^3*(1-2x)).
%C a(n+1)=A014833(n+2).
%C Partial sums of A130103.
%H Seiichi Manyama, <a href="/A130104/b130104.txt">Table of n, a(n) for n = 0..3320</a>
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (5,-9,7,-2).
%F a(n)=2^(n+1)-C(n+2,2)-0^n.
%t Accumulate[Join[{0,1},LinearRecurrence[{4,-5,2},{1,4,11},40]]] (* _Harvey P. Dale_, May 16 2014 *)
%t Join[{0},LinearRecurrence[{5, -9, 7, -2},{1, 2, 6, 17},29]] (* _Ray Chandler_, Aug 03 2015 *)
%Y Cf. A014833, A130103.
%K easy,nonn
%O 0,3
%A _Paul Barry_, May 07 2007
|
