login
a(1)=2; a(n) = floor((17 + Sum_{j=1..n-1} a(j))/8).
0

%I #10 Mar 17 2024 18:00:23

%S 2,2,2,2,3,3,3,4,4,5,5,6,7,8,9,10,11,12,14,16,18,20,22,25,28,32,36,40,

%T 45,51,57,64,72,81,92,103,116,130,147,165,186,209,235,264,297,335,376,

%U 423,476,536,603,678,763,858,966,1086,1222,1375,1547,1740,1958,2202

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

%t f[s_] := Append[s, Floor[(17 + Plus @@ s)/8]]; Nest[f, {2}, 60] (* _Robert G. Wilson v_, Jul 08 2006 *)

%Y Cf. A073941, A112088, A072493.

%K nonn

%O 1,1

%A _Graeme McRae_, Jun 10 2006

%E More terms from _Robert G. Wilson v_, Jul 08 2006