OFFSET
1,1
COMMENTS
The next terms are non-integral: 11/2, 15/2. 21/2, 21/4, 29/4, 41/4, 41/8, 57/8, 81/8, 81/16, ...
The terms get closer and closer to the limit cycle 10,5,7. - Zak Seidov, Feb 18 2006
MATHEMATICA
a[1]=18; a[n_]:= If[Mod[n, 3]==2, a[n-1]/2, If[Mod[n, 3]==0, a[n-1]+2, a[n-1]+3]]; Table[a[n], {n, 10}] (* James C. McMahon, Jun 13 2024 *)
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Joshua Zucker and Floor van Lamoen, Feb 17 2006
STATUS
approved