A152467 a(n) = floor(n/6).

0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14

Offset

0,13

Comments

Apart from initial terms, same as A097992. - Philippe Deléham, Dec 06 2008

Links

Table of n, a(n) for n=0..89.

Index entries for linear recurrences with constant coefficients, signature (1,0,0,0,0,1,-1).

Formula

From R. J. Mathar and Philippe Deléham, Dec 06 2008: (Start)

a(n) = floor(n/6) = a(n-6) + 1.

G.f.: x^6/((1-x)^2*(1+x)*(1+x+x^2)*(x^2-x+1)). (End)

a(n) = (6*n - 15 + 3*(-1)^n + 12*sin( (2*n+1)*Pi/6 ) + 4*sqrt(3)*sin( (2n+1)*Pi/3) )/36.

a(n) = floor( (3*n-2)/2 - (4*n-3)/3 ). - Robert G. Wilson v, Jun 04 2011

E.g.f.: (6*cos(sqrt(3)*x/2)*cosh(x/2) + 3*(x - 2)*cosh(x) + 2*sqrt(3)*sin(sqrt(3)*x/2)*(2*cosh(x/2) + sinh(x/2)) + 3*(x - 3)*sinh(x))/18. - Stefano Spezia, Nov 13 2022

Maple

A152467:=n->floor(n/6); seq(A152467(n), n=0..100); # Wesley Ivan Hurt, Dec 10 2013

Mathematica

Table[Floor[n/6], {n, 0, 100}] (* Wesley Ivan Hurt, Dec 10 2013 *)

Prog

(Sage) [floor(n/6) for n in range(0, 90)] # Zerinvary Lajos, Dec 02 2009
(PARI) a(n)=n\6 \\ Charles R Greathouse IV, Jun 04 2011

Crossrefs

Cf. A097992.

Sequence in context: A133876 A321018 A340764 * A242602 A097992 A195177

Adjacent sequences: A152464 A152465 A152466 * A152468 A152469 A152470

Keyword

nonn,easy

Author

Vladimir Joseph Stephan Orlovsky, Dec 05 2008

Status

approved