A120141 a(n) = 14 + floor( (1 + Sum_{j=0..n-1} a(j)) / 2).
14, 21, 32, 48, 72, 108, 162, 243, 364, 546, 819, 1229, 1843, 2765, 4147, 6221, 9331, 13997, 20995, 31493, 47239, 70859, 106288, 159432, 239148, 358722, 538083, 807125, 1210687, 1816031, 2724046, 4086069, 6129104, 9193656, 13790484
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
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 *)
-
SageMath
@CachedFunction def A120141(n): return 14 +(1 +sum(A120141(k) for k in range(1,n)))//2 [A120141(n) for n in range(1,60)] # G. C. Greubel, May 11 2023