A120143 - OEIS

%I #13 May 13 2023 19:20:39

%S 17,26,39,58,87,131,196,294,441,662,993,1489,2234,3351,5026,7539,

%T 11309,16963,25445,38167,57251,85876,128814,193221,289832,434748,

%U 652122,978183,1467274,2200911,3301367,4952050,7428075,11142113,16713169

%N a(n) = 17 + floor( (1 + Sum_{j=0..n-1} a(j))/2 ).

%H Harvey P. Dale, <a href="/A120143/b120143.txt">Table of n, a(n) for n = 1..1000</a>

%t nxt[{t_,a_}]:=Module[{c=17+Floor[(1+t)/2]},{t+c,c}]; NestList[nxt,{17,17},60][[All,2]] (* _Harvey P. Dale_, Dec 25 2020 *)

%o (SageMath)

%o @CachedFunction

%o def A120143(n): return 17 + (1 +sum(A120143(k) for k in range(1,n)))//2

%o [A120143(n) for n in range(1,60)] # _G. C. Greubel_, May 11 2023

%Y Cf. A073941, A072493, A112088, A120134 - A120142, A120144 - A120209.

%K nonn

%O 1,1

%A _Graeme McRae_, Jun 10 2006