A133875 n modulo 5 repeated 5 times.

1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1

Offset

0,6

Comments

Periodic with length 5^2 = 25.

Links

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

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

Formula

a(n) = (1 + floor(n/5)) mod 5.

a(n) = A010874(A002266(n+5)).

a(n) = 1 + floor(n/5) - 5*floor((n+5)/25).

a(n) = (((n+5) mod 25) - (n mod 5)) / 5.

a(n) = ((n + 5 - (n mod 5)) / 5) mod 5.

a(n) = A010874((n + 5 - A010874(n))/5).

a(n) = binomial(n+5, n) mod 5 = binomial(n+5, 5) mod 5.

a(n) = +a(n-1) -a(n-5) +a(n-6) -a(n-10) +a(n-11) -a(n-15) +a(n-16) -a(n-20) +a(n-21). - R. J. Mathar, Sep 03 2011

G.f.: ( 1+2*x^5+3*x^10+4*x^15 ) / ( (1-x)*(x^20+x^15+x^10+x^5+1) ). - R. J. Mathar, Sep 03 2011

Maple

A133875:=n->((1+floor(n/5)) mod 5); seq(A133875(n), n=0..100); # Wesley Ivan Hurt, Jun 06 2014

Mathematica

Table[Mod[1 + Floor[n/5], 5], {n, 0, 100}] (* Wesley Ivan Hurt, Jun 06 2014 *)
LinearRecurrence[{1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 0, -1, 1}, {1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 0}, 120] (* Harvey P. Dale, Dec 14 2017 *)

Prog

(Magma) [(1 + Floor(n/5)) mod 5 : n in [0..50]]; // Wesley Ivan Hurt, Jun 06 2014

Crossrefs

Cf. A133620-A133625, A133630, A038509, A133634-A133636.

Cf. A133885, A133880, A133890, A133900, A133910.

Sequence in context: A363743 A085290 A108611 * A104355 A235402 A092278

Adjacent sequences: A133872 A133873 A133874 * A133876 A133877 A133878

Keyword

nonn,easy,less

Author

Hieronymus Fischer, Oct 10 2007

Status

approved