%I#10 2019年2月19日11:48:25
%S 1,1,1,1,1,1,1,2,2,2,3,3,4,4,5,5,6,7,8,9,10,12,14,16,18,20,23,27,
%电话:30,35,40,45,52,59,68,77,88101115151172197225257294336,
%电话:38443950157365574885597711171277145916671906217824892845
%N a(N)=上限(总和{i=1..N-1}a(i)/7),a(1)=1。
%t f[s_]:=附加[s,天花板[Plus@@s/7];嵌套[f,{1},64](*_Robert G.Wilson v_,2006年7月7日*)
%Y参见A112088、A072493、A011782、A073941、A07249、A120160、A120170、A120178、A120186、A120194、A120202。
%K nonn公司
%O 1,9型
%A _Graeme McRae_,2006年6月10日
%E由_Robert G.Wilson v_编辑和扩展,2006年7月7日