login
A046515
Numbers with multiplicative persistence value 6.
5
6788, 6878, 6887, 7688, 7868, 7886, 8678, 8687, 8768, 8786, 8867, 8876, 16788, 16878, 16887, 17688, 17868, 17886, 18678, 18687, 18768, 18786, 18867, 18876, 23788, 23878, 23887, 24678, 24687, 24768, 24786, 24867, 24876, 26478, 26487
OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Multiplicative Persistence
EXAMPLE
6788 -> [ 2688 ][ 768 ][ 336 ][ 54 ][ 20 ][ 0 ] -> one digit in six 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=6, [$1..30000]); # Robert Israel, Feb 12 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1998
EXTENSIONS
Offset corrected by Robert Israel, Feb 12 2019
STATUS
approved