|
%I #10 Feb 02 2021 21:08:48
%S 1,3,6,11,16,24,31,42,51,65,76,93,106,126,141,164,181,207,226,255,276,
%T 308,331,366,391,429,456,497,526,570,601,648,681,731,766,819,856,912,
%U 951,1010,1051,1113,1156,1221,1266,1334,1381,1452,1501,1575,1626
%N Partial sums of A063914.
%H G. C. Greubel, <a href="/A087099/b087099.txt">Table of n, a(n) for n = 1..1000</a>
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,2,0,-1).
%F From _Chai Wah Wu_, Feb 02 2021: (Start)
%F a(n) = 2*a(n-2) - a(n-4) for n > 4.
%F G.f.: x*(x^3 + x^2 + 2*x + 1)/((x - 1)^2*(x + 1)^2). (End)
%t With[{nn=50},Accumulate[Riffle[Range[1,2*nn,2],3*Range[0,nn]+2]]] (* _Harvey P. Dale_, Jul 25 2013 *)
%Y Cf. A086848, A087098, A001068.
%K easy,nonn
%O 1,2
%A _Jeremy Gardiner_, Aug 10 2003
|
