This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A368114 #12 Jun 09 2024 08:35:43 %S A368114 11,122,61,672,336,168,84,42,21,7,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3, %T A368114 1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12, %U A368114 6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1,12,6,3,1 %N A368114 Trajectory of 11 under the '11x+1' map. %C A368114 See A368085 for definition and cross references. %H A368114 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,1). %F A368114 G.f.: (11 + 122*x + 61*x^2 + 672*x^3 + 325*x^4 + 46*x^5 + 23*x^6 - 630*x^7 - 315*x^8 - 161*x^9 - 83*x^10 - 30*x^11 - 15*x^12 - 4*x^13)/(1 - x^4). - _Stefano Spezia_, Jun 09 2024 %t A368114 Px1[p_,n_]:=Catch[For[i=1,i<PrimePi[p],i++,If[Divisible[n,Prime[i]],Throw[n/Prime[i]]]];p*n+1];NestList[Px1[11,#]&,11,100] %Y A368114 Cf. A368085. %K A368114 nonn,easy %O A368114 0,1 %A A368114 _Paolo Xausa_, Dec 12 2023