|
%I #14 Apr 22 2021 03:35:01
%S 0,1,1,1,1,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,4,4,4,
%T 4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
%U 6,6,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,8,8,8,8,8
%N n appears 3n+1 times.
%F a(n) = floor((sqrt(24n+1)+1)/6).
%e a(5) = floor((sqrt(24*5+1)+1)/6) = 2.
%t f[n_] := Floor[(Sqrt[24 n + 1] + 1)/6]; Array[f, 105, 0] (* _Robert G. Wilson v_, Sep 10 2010 *)
%o (Python) l = [floor((sqrt(24*n+1)+1)/6) for n in range(0,101)]
%o (PARI) a(n) = (sqrtint(24*n+1)+1)\6; \\ _Kevin Ryde_, Apr 21 2021
%Y Cf. A000326 (indices of run starts), A180446.
%K easy,nonn
%O 0,6
%A _William A. Tedeschi_, Sep 07 2010
%E More terms from _Robert G. Wilson v_, Sep 10 2010
|
