A298037 Partial sums of A298036.

1, 13, 25, 61, 85, 145, 181, 265, 313, 421, 481, 613, 685, 841, 925, 1105, 1201, 1405, 1513, 1741, 1861, 2113, 2245, 2521, 2665, 2965, 3121, 3445, 3613, 3961, 4141, 4513, 4705, 5101, 5305, 5725, 5941, 6385, 6613, 7081, 7321, 7813, 8065, 8581, 8845, 9385, 9661

Offset: 0

Author

N. J. A. Sloane, Jan 22 2018

Keywords

• nonn
• easy

Examples

			a(1) = 12 + 1 = 13
a(2) = 12 + 13 = 25
a(3) = 36 + 25 = 61
		

Links

• Hakan Icoz, Table of n, a(n) for n = 0..20000
• Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Crossrefs

Cf. A298036.

Programs

Mathematica

LinearRecurrence[{1, 2, -2, -1, 1}, {1, 13, 25, 61, 85}, 100] (* Paolo Xausa, Jul 20 2024 *)

Formula

From Joerg Arndt, Aug 23 2020: (Start)

G.f.: (1 + 12*x + 10*x^2 + 12*x^3 + x^4)/((1 - x^2)^2*(1-x)).

a(n) = a(n-1) + 2*a(n-2) - 2*a(n-3) - a(n-4) + a(n-5). (End)

a(n)= A298036(n) + a(n-1). - Hakan Icoz, Aug 23 2020

Extensions

a(7)-a(50) from Hakan Icoz, Aug 22 2020