|
|
A089756
|
|
a(1)=1 and a(i+1)=a(i)+9 if a(i)<=35, and a(i+1)=a(i)-35 if a(i)>35.
|
|
2
|
|
|
1, 10, 19, 28, 37, 2, 11, 20, 29, 38, 3, 12, 21, 30, 39, 4, 13, 22, 31, 40, 5, 14, 23, 32, 41, 6, 15, 24, 33, 42, 7, 16, 25, 34, 43, 8, 17, 26, 35, 44, 9, 18, 27, 36, 1, 10, 19, 28, 37, 2, 11, 20, 29, 38, 3, 12, 21, 30, 39, 4, 13, 22, 31, 40, 5, 14, 23, 32, 41, 6, 15, 24, 33, 42, 7, 16, 25, 34, 43, 8, 17
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Infinite cyclic sequence with a(44*j+k)=a(k) and 0 < k < 45 with all and only one time the 44th first integers > 0.
|
|
LINKS
|
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
|
|
MAPLE
|
option remember;
if n = 1 then
1;
else
if procname(n-1) > 35 then
procname(n-1)-35 ;
else
procname(n-1)+9 ;
end if;
end if;
end proc:
|
|
MATHEMATICA
|
NestList[If[#<36, #+9, #-35]&, 1, 80] (* Harvey P. Dale, Nov 04 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|