[go: up one dir, main page]

login
A067896
Trajectory of 41 under map x -> x/2 if x even, x-> 3x+3 if x odd.
3
41, 126, 63, 192, 96, 48, 24, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3, 12, 6, 3
OFFSET
0,1
MATHEMATICA
NestList[If[EvenQ[#], #/2, 3#+3]&, 41, 100] (* Harvey P. Dale, Mar 30 2011 *)
CROSSREFS
Sequence in context: A256347 A232100 A195038 * A205797 A203804 A142290
KEYWORD
nonn
AUTHOR
Ernst Berg, May 15 2003
STATUS
approved