cp's OEIS Frontend

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.

Showing 1-3 of 3 results.

A343158 a(n) is the smallest m such that A343156(m) = n, or -1 if no such m exists.

Original entry on oeis.org

2, 4, 10, 35, 15, 34, 190, 290, 303, 395, 130, 465, 553, 265, 195, 663, 218, 582, 481, 858, 714, 418, 345, 530, 382, 1771, 1207, 2098, 3890, 1426, 2090, 4834, 4618, 627, 2321, 2163, 326, 866, 3302, 1298, 3886, 3094, 1086, 6130, 4807, 3646, 5181, 905, 3945, 5753
Offset: 0

Views

Author

N. J. A. Sloane, Apr 07 2021

Keywords

Examples

			2 takes 0 steps to reach a prime, so a(0) = 2.
10 -> 25 -> 5 takes 2 steps to reach a prime (and no smaller number takes that many steps), so a(2) = 10.
35 -> 57 -> 319 -> 1129 takes 3 steps to reach a prime (and no smaller number takes that many steps), so a(3) = 35.
		

References

  • Eric Angelini, W. Edwin Clark, Hans Havermann, Frank Stevenson, Allan C. Wechsler, and others, Postings to Math Fun mailing list, April 2021.

Crossrefs

Programs

  • PARI
    is(m, n) = my(k=m); for(i=1, n, if(isprime(k), return(0), k=eval(concat(apply(t->Str(t), factor(k)[, 1]~))))); isprime(k);
    a(n) = for(m=2, oo, if(is(m, n), return(m))); \\ Jinyuan Wang, Jul 16 2022

Extensions

a(32)-a(42) from Hans Havermann, Apr 07 2021
a(43)-a(48) from Hans Havermann, Apr 08 2021
a(49) from Jinyuan Wang, Jul 16 2022

A084319 Orbit of 91 under function described in A084317.

Original entry on oeis.org

91, 713, 2331, 3737, 37101, 383149, 1329473, 10912197, 328312853, 1129846623, 3735159117, 31245053039, 173977184859, 3293176308321, 319269241788861, 371325123869195203, 1278647733810375857, 1665622037676698019, 31742715741254857303, 56627509560552923867
Offset: 0

Views

Author

Labos Elemer, Jun 16 2003

Keywords

Comments

This sequence takes 64 steps to reach a prime (which implies A343156(91)=64). - N. J. A. Sloane, Apr 07 2021

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.

Crossrefs

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

A343157 Trajectory of 407 under the map x -> A084317(x).

Original entry on oeis.org

407, 1137, 3379, 31109, 132393, 344131, 1731653, 71143523, 115771019, 7133141039, 18152375353, 723112747673, 1938058565667, 372411163329269, 646991575604859, 3500960117162747, 19920988418382133, 479222853318661919, 3877130279948783893, 71942196909541476259, 7170749184914732550379
Offset: 0

Views

Author

Hans Havermann, Apr 07 2021

Keywords

Comments

It is not known if any a(n) is a prime (see discussion in A343156). - N. J. A. Sloane, Apr 07 2021

References

  • Eric Angelini, W. Edwin Clark, Hans Havermann, Frank Stevenson, Allan C. Wechsler, and others, Postings to Math Fun mailing list, April 2021.

Crossrefs

Showing 1-3 of 3 results.