A120148 a(n) = 25 + floor( Sum_{j=1..n-1} a(j)/2 ).

25, 37, 56, 84, 126, 189, 283, 425, 637, 956, 1434, 2151, 3226, 4839, 7259, 10888, 16332, 24498, 36747, 55121, 82681, 124022, 186033, 279049, 418574, 627861, 941791, 1412687, 2119030, 3178545, 4767818, 7151727, 10727590, 16091385

Offset: 1

Author

Graeme McRae, Jun 10 2006

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A072493, A073941, A112088.

Programs

Mathematica

nxt[{t_,a_}]:=Module[{c=25+Floor[t/2]},{t+c,c}]; NestList[nxt,{25,25},40][[;;,2]] (* Harvey P. Dale, May 17 2023 *)

SageMath

@CachedFunction
def A120148(n): return 25 + sum(A120148(k) for k in range(1, n))//2
[A120148(n) for n in range(1, 61)] # G. C. Greubel, May 31 2023