A244892 a(n) = a(n-a(n-1)) with initial values 5,2,5,2.

5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5, 2, 5, 2, 5, 5

Offset

0,1

Comments

Periodic with period (5,2,5,2,5).

Links

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

S. W. Golomb, Discrete chaos: sequences satisfying "strange" recursions, unpublished manuscript, circa 1990 [cached copy, with permission (annotated)]

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

Maple

f:=proc(n, o, S) option remember; # o = offset, S = init. terms
L:=nops(S);
if n < 0 then 0
elif n <= o+L-1 then S[n-o+1]
else f(n-f(n-1, o, S), o, S); fi; end;
[seq(f(n, 0, [5, 2, 5, 2]), n=0..100)];

Mathematica

LinearRecurrence[{0, 0, 0, 0, 1}, {5, 2, 5, 2, 5}, 76] (* Ray Chandler, Aug 25 2015 *)

Crossrefs

Sequence in context: A168464 A059688 A072996 * A278066 A153107 A247488

Adjacent sequences: A244889 A244890 A244891 * A244893 A244894 A244895

Keyword

nonn

Author

N. J. A. Sloane, Jul 17 2014

Status

approved