login
A120138
a(n) = 10 + floor(Sum_{j=1..n-1} a(j) / 2).
3
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,1
LINKS
MATHEMATICA
a[n_]:= a[n]= 10 +Quotient[Sum[a[k], {k, n-1}], 2];
Table[a[n], {n, 60}] (* G. C. Greubel, May 08 2023 *)
PROG
(SageMath)
@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
KEYWORD
nonn
AUTHOR
Graeme McRae, Jun 10 2006
STATUS
approved