A084319 Orbit of 91 under function described in A084317.
91, 713, 2331, 3737, 37101, 383149, 1329473, 10912197, 328312853, 1129846623, 3735159117, 31245053039, 173977184859, 3293176308321, 319269241788861, 371325123869195203, 1278647733810375857, 1665622037676698019, 31742715741254857303, 56627509560552923867
Offset: 0
Examples
a(29) = 19797186041838357425713338412621, the 29th iterate.
References
- Eric Angelini, W. Edwin Clark, Hans Havermann, Frank Stevenson, Allan C. Wechsler, and others, Postings to Math Fun mailing list, April 2021.
Links
- W. Edwin Clark, Table of n, a(n) for n = 0..63 [The trajectory to the first prime.]
Programs
-
Mathematica
NestList[FromDigits@ Flatten@ IntegerDigits@ Map[First, FactorInteger@ #] &, 91, 17] (* Michael De Vlieger, Mar 25 2017 *)
Extensions
Example corrected by Rémy Sigrist, Apr 07 2021
Comments