login
A033973
Trajectory of 1 under map n->35n+1 if n odd, n->n/2 if n even
0
1, 36, 18, 9, 316, 158, 79, 2766, 1383, 48406, 24203, 847106, 423553, 14824356, 7412178, 3706089, 129713116, 64856558, 32428279, 1134989766, 567494883, 19862320906, 9931160453, 347590615856, 173795307928
OFFSET
0,2
MATHEMATICA
NestList[If[OddQ[#], 35#+1, #/2]&, 1, 25] (* Harvey P. Dale, Jan 07 2011 *)
CROSSREFS
Sequence in context: A061038 A058231 A008894 * A033356 A158955 A065784
KEYWORD
nonn
AUTHOR
STATUS
approved