

A263131


Ordinal transform of the multiplicative persistence A031346.


2



1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 1, 2, 3, 4, 5, 16, 17, 18, 19, 6, 7, 8, 9, 10, 1, 20, 21, 22, 11, 12, 13, 14, 2, 15, 3, 23, 24, 16, 17, 18, 4, 19, 5, 20, 6, 25, 26, 21, 22, 23, 24, 7, 25, 8, 9, 27, 28, 26, 27
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


COMMENTS

n is the a(n)th nonnegative integer having its multiplicative persistence.


LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..20000
Eric Weisstein's World of Mathematics, Multiplicative Persistence


MAPLE

m:= n> mul(i, i=convert(n, base, 10)):
p:= n> `if`(n<10, 0, 1+p(m(n))):
b:= proc() 0 end:
a:= proc(n) option remember; local t;
t:= p(n); b(t):= b(t)+1
end:
seq(a(n), n=0..100);


CROSSREFS

Cf. A031346.
Sequence in context: A214587 A010889 A053831 * A274206 A214949 A067453
Adjacent sequences: A263128 A263129 A263130 * A263132 A263133 A263134


KEYWORD

nonn,look,base


AUTHOR

Alois P. Heinz, Oct 10 2015


STATUS

approved



