|
%I #21 May 14 2023 12:43:21
%S 14,21,32,48,72,108,162,243,364,546,819,1229,1843,2765,4147,6221,9331,
%T 13997,20995,31493,47239,70859,106288,159432,239148,358722,538083,
%U 807125,1210687,1816031,2724046,4086069,6129104,9193656,13790484
%N a(n) = 14 + floor( (1 + Sum_{j=0..n-1} a(j)) / 2).
%H Harvey P. Dale, <a href="/A120141/b120141.txt">Table of n, a(n) for n = 1..1000</a>
%t nxt[{t_,a_}]:=Module[{a2=14+Floor[(1+t)/2]},{t+a2,a2}]; NestList[nxt,{0,14},60][[All,2]]//Rest (* _Harvey P. Dale_, Nov 28 2018 *)
%o (SageMath)
%o @CachedFunction
%o def A120141(n): return 14 +(1 +sum(A120141(k) for k in range(1,n)))//2
%o [A120141(n) for n in range(1,60)] # _G. C. Greubel_, May 11 2023
%Y Cf. A073941, A072493, A112088, A120134 - A120140, A120142 - A120209.
%K nonn
%O 1,1
%A _Graeme McRae_, Jun 10 2006
|
