A298041 Partial sums of A298040.

1, 5, 25, 49, 89, 129, 189, 245, 325, 397, 497, 585, 705, 809, 949, 1069, 1229, 1365, 1545, 1697, 1897, 2065, 2285, 2469, 2709, 2909, 3169, 3385, 3665, 3897, 4197, 4445, 4765, 5029, 5369, 5649, 6009, 6305, 6685, 6997, 7397, 7725, 8145, 8489, 8929, 9289, 9749

Offset: 0

Author

N. J. A. Sloane, Jan 22 2018

Keywords

• nonn
• more

Crossrefs

Cf. A298040.

Programs

Mathematica

Accumulate[LinearRecurrence[{0,2,0,-1},{1,4,20,24,40,40},60]] (* Harvey P. Dale, Oct 06 2023 *)

Extensions

More terms from Harvey P. Dale, Oct 06 2023