|
%I #7 Apr 09 2022 17:23:39
%S 3,76,38,19,476,238,119,2976,1488,744,372,186,93,2326,1163,29076,
%T 14538,7269,181726,90863,2271576,1135788,567894,283947,7098676,
%U 3549338,1774669,44366726,22183363,554584076,277292038
%N Trajectory of 3 under map n->25n+1 if n odd, n->n/2 if n even
%H Harvey P. Dale, <a href="/A037110/b037110.txt">Table of n, a(n) for n = 0..1000</a>
%t NestList[If[OddQ[#],25#+1,#/2]&,3,30] (* _Harvey P. Dale_, Apr 09 2022 *)
%K nonn
%O 0,1
%A _N. J. A. Sloane_.
|
