login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A368115
Trajectory of 17 under the '17x+1' map.
1
17, 290, 145, 29, 494, 247, 19, 324, 162, 81, 27, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1, 18, 9, 3, 1
OFFSET
0,1
COMMENTS
See A368085 for definition and cross references.
MATHEMATICA
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[17, #]&, 17, 100]
CROSSREFS
Cf. A368085.
Sequence in context: A128358 A015969 A001026 * A178765 A041546 A186000
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Dec 12 2023
STATUS
approved

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy