

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.
Periodic with period = 44.  Harvey P. Dale, Nov 04 2019


LINKS

Table of n, a(n) for n=1..81.
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

A089756 := proc(n)
option remember;
if n = 1 then
1;
else
if procname(n1) > 35 then
procname(n1)35 ;
else
procname(n1)+9 ;
end if;
end if;
end proc:
seq(A089756(n), n=1..100) ; # R. J. Mathar, Feb 28 2019


MATHEMATICA

NestList[If[#<36, #+9, #35]&, 1, 80] (* Harvey P. Dale, Nov 04 2019 *)


CROSSREFS

Sequence in context: A044053 A044434 A098750 * A097153 A017173 A326833
Adjacent sequences: A089753 A089754 A089755 * A089757 A089758 A089759


KEYWORD

nonn,easy,less


AUTHOR

Pierre CAMI, Jan 08 2004


STATUS

approved



