A120184 a(1)=8; a(n)=floor((48+sum(a(1) to a(n-1)))/6).
8, 9, 10, 12, 14, 16, 19, 22, 26, 30, 35, 41, 48, 56, 65, 76, 89, 104, 121, 141, 165, 192, 224, 261, 305, 356, 415, 484, 565, 659, 769, 897, 1047, 1221, 1425, 1662, 1939, 2262, 2639, 3079
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
nxt[{t_,a_}]:=With[{c=Floor[(48+t)/6]},{t+c,c}]; NestList[nxt,{8,8},40][[All,2]] (* Harvey P. Dale, Apr 07 2019 *)