A046514 Numbers with multiplicative persistence value 5.

679, 688, 697, 769, 796, 868, 886, 967, 976, 1679, 1688, 1697, 1769, 1796, 1868, 1886, 1967, 1976, 2379, 2388, 2397, 2468, 2486, 2648, 2684, 2688, 2739, 2777, 2793, 2838, 2846, 2864, 2868, 2883, 2886, 2937, 2973, 3279, 3288, 3297, 3367, 3376, 3448

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Eric Weisstein's World of Mathematics, Multiplicative Persistence

Example

2777 -> [ 686 ][ 288 ][ 128 ][ 16 ][ 6 ] -> one digit in five steps.

Maple

mp:= proc(n) option remember;
    if n <= 9 then return 0 fi;
    1+procname(convert(convert(n, base, 10), `*`))
end proc:
select(mp=5, [$1..4000]); # Robert Israel, Feb 12 2019

Crossrefs

Cf. A003001, A014120, A046505.

Sequence in context: A186127 A097771 A121105 * A199995 A352263 A340091

Adjacent sequences: A046511 A046512 A046513 * A046515 A046516 A046517

Keyword

nonn,base

Author

Patrick De Geest, Sep 15 1998

Extensions

Offset corrected by Robert Israel, Feb 12 2019

Status

approved