|
|
A033965
|
|
Trajectory of 1 under map n->17n+1 if n odd, n->n/2 if n even
|
|
0
|
|
|
1, 18, 9, 154, 77, 1310, 655, 11136, 5568, 2784, 1392, 696, 348, 174, 87, 1480, 740, 370, 185, 3146, 1573, 26742, 13371, 227308, 113654, 56827, 966060, 483030, 241515, 4105756, 2052878, 1026439, 17449464
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
NestList[If[EvenQ[#], #/2, 17#+1]&, 1, 40] (* Harvey P. Dale, Jan 24 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|