%I #15 Sep 03 2017 15:15:58
%S 0,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,5,
%T 5,5,5,5,5,5,5,6,6,6,6,6,6,6,6,7,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,9,9,9,
%U 9,9,9,9,9,10,10,10,10,10,10,10,10,11,11,11,11,11,11,11,11,12,12,12,12,12
%N a(n) = A110654(A110654(A110654(n))).
%H G. C. Greubel, <a href="/A110656/b110656.txt">Table of n, a(n) for n = 0..1000</a>
%F a(n) = ceiling(n/8).
%F a(n) = A110654(A110655(n)) = A110655(A110654(n)).
%F G.f.: x / ((x-1)^2*(x+1)*(x^2+1)*(x^4+1)). - _Colin Barker_, Apr 01 2013
%t Table[Ceiling[n/8], {n, 0, 50}] (* _G. C. Greubel_, Sep 03 2017 *)
%o (PARI) for(n=0,50, print1(ceil[n/8], ", ")) \\ _G. C. Greubel_, Sep 03 2017
%Y Cf. A110658.
%K nonn
%O 0,10
%A _Reinhard Zumkeller_, Aug 05 2005