This site is supported by donations to The OEIS Foundation.

"Email this user" was broken Aug 14 to 9am Aug 16. If you sent someone a message in this period, please send it again.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A046503 Primes with multiplicative persistence value 3. 2
 47, 59, 79, 89, 97, 139, 149, 157, 179, 193, 197, 227, 229, 239, 263, 283, 293, 337, 347, 353, 359, 367, 373, 383, 389, 419, 433, 443, 449, 463, 479, 487, 491, 499, 571, 577, 593, 619, 643, 661, 673, 683, 691, 719, 733, 743, 751, 757, 797, 823, 829, 839 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Eric Weisstein's World of Mathematics, Multiplicative Persistence EXAMPLE 47 -> 4 * 7 -> [ 28 ] -> 2 * 8 -> [ 16 ] -> 1 * 6 -> [ 6 ] -> one digit in three steps. MATHEMATICA pr3Q[n_] := Length[NestWhileList[Times @@ IntegerDigits[#] &, n, # > 9 &]] == 4; Select[Prime[Range[147]], pr3Q] (* Jayanta Basu, Jun 26 2013 *) CROSSREFS Cf. A046500, A046512. Sequence in context: A045140 A104852 A061758 * A227982 A102274 A139909 Adjacent sequences:  A046500 A046501 A046502 * A046504 A046505 A046506 KEYWORD nonn,base AUTHOR Patrick De Geest, Sep 15 1998. STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.