Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A033969
Trajectory of 1 under map n->25n+1 if n odd, n->n/2 if n even
0
1, 26, 13, 326, 163, 4076, 2038, 1019, 25476, 12738, 6369, 159226, 79613, 1990326, 995163, 24879076, 12439538, 6219769, 155494226, 77747113, 1943677826, 971838913, 24295972826, 12147986413
OFFSET
0,2
MATHEMATICA
NestList[If[OddQ[#], 25#+1, #/2]&, 1, 30] (* Harvey P. Dale, Sep 10 2024 *)
CROSSREFS
Sequence in context: A033346 A158605 A040653 * A078547 A036168 A005606
KEYWORD
nonn
AUTHOR
STATUS
approved