A120209 -id:A120209 - cp's OEIS frontend

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

19, 28, 42, 63, 95, 142, 213, 320, 480, 720, 1080, 1620, 2430, 3645, 5467, 8201, 12301, 18452, 27678, 41517, 62275, 93413, 140119, 210179, 315268, 472902, 709353, 1064030, 1596045, 2394067, 3591101, 5386651, 8079977, 12119965, 18179948

Offset: 1

Graeme McRae, Jun 10 2006

nonn

G. C. Greubel, Table of n, a(n) for n = 1..1000

Cf. A073941, A072493, A112088, A120134 - A120143, A120145 - A120209.

a[n_]:= a[n]= 19 +Quotient[Sum[a[k], {k,n-1}], 2];
Table[a[n], {n,60}] (* G. C. Greubel, May 14 2023 *)

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

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

Original entry on oeis.org

20, 30, 45, 68, 102, 153, 229, 344, 516, 774, 1161, 1741, 2612, 3918, 5877, 8815, 13223, 19834, 29751, 44627, 66940, 100410, 150615, 225923, 338884, 508326, 762489, 1143734, 1715601, 2573401, 3860102, 5790153, 8685229, 13027844

Offset: 1

Graeme McRae, Jun 10 2006

nonn

G. C. Greubel, Table of n, a(n) for n = 1..1000

Cf. A073941, A072493, A112088, A120134 - A120144, A120146 - A120209.

a[n_]:= a[n]= 20 +Quotient[1 +Sum[a[k], {k,n-1}], 2];
Table[a[n], {n,60}] (* G. C. Greubel, May 14 2023 *)

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

cp's OEIS Frontend

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

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

SageMath