A170881 a(0)=0; thereafter a(n) = (3*n+1)*2^(n-2)+1.

0, 1, 3, 8, 21, 53, 129, 305, 705, 1601, 3585, 7937, 17409, 37889, 81921, 176129, 376833, 802817, 1703937, 3604481, 7602177, 15990785, 33554433, 70254593, 146800641, 306184193, 637534209, 1325400065, 2751463425, 5704253441, 11811160065, 24427626497, 50465865729

Offset

0,3

Links

Table of n, a(n) for n=0..32.

Mathematica

Join[{0, 1}, Table[(3n+1)2^(n-2)+1, {n, 40}]] (* Harvey P. Dale, Nov 26 2023 *)

Crossrefs

Essentially the first column of the triangular array in A151747.

Partial sums of A098156.

Sequence in context: A007835 A152086 A014396 * A039671 A267946 A166287

Adjacent sequences: A170878 A170879 A170880 * A170882 A170883 A170884

Keyword

nonn

Author

N. J. A. Sloane, Jan 07 2010

Extensions

Zero prepended by Harvey P. Dale, Nov 26 2023

Status

approved