A120139 -id:A120139 - cp's OEIS frontend

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

10, 15, 22, 33, 50, 75, 112, 168, 252, 378, 567, 851, 1276, 1914, 2871, 4307, 6460, 9690, 14535, 21803, 32704, 49056, 73584, 110376, 165564, 248346, 372519, 558779, 838168, 1257252, 1885878, 2828817, 4243226, 6364839, 9547258, 14320887

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 - A120137, A120139 - A120209.

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

@CachedFunction
def A120138(n): return 10 +sum(A120138(k) for k in range(1,n))//2
[A120138(n) for n in range(1,60)] # G. C. Greubel, May 08 2023

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

Original entry on oeis.org

13, 19, 29, 43, 65, 97, 146, 219, 328, 492, 738, 1107, 1661, 2491, 3737, 5605, 8408, 12612, 18918, 28377, 42565, 63848, 95772, 143658, 215487, 323230, 484845, 727268, 1090902, 1636353, 2454529, 3681794, 5522691, 8284036, 12426054, 18639081

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 - A120139, A120141 - A120209.

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

@CachedFunction
def A120140(n): return 13 + sum(A120140(k) for k in range(1,n))//2
[A120140(n) for n in range(1,60)] # G. C. Greubel, May 11 2023

cp's OEIS Frontend

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

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

SageMath