login
A112876
Repeatedly divide by 2, add 2 and add 3.
1
18, 9, 11, 14, 7, 9, 12, 6, 8, 11
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
Sequence in context: A033338 A337731 A169736 * A070703 A181761 A233471
KEYWORD
nonn,fini,full
AUTHOR
STATUS
approved