|
| |
|
|
A350186
|
|
Numbers of multiplicative persistence 7 which are themselves the product of digits of a number.
|
|
7
|
| |
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
The multiplicative persistence of a number mp(n) is the number of times the product of digits function p(n) must be applied to reach a single digit, i.e., A031346(n).
The product of digits function partitions all numbers into equivalence classes. There is a one-to-one correspondence between values in this sequence and equivalence classes of numbers with multiplicative persistence 8.
There are infinitely many numbers with mp of 1 to 11, but the classes of numbers (p(n)) are postulated to be finite for sequences A350181....
Equivalently:
This sequence consists of the numbers A007954(k) such that A031346(k) = 8,
These are the numbers k in A002473 such that A031346(k) = 7,
Or:
- they factor into powers of 2, 3, 5 and 7 exclusively.
- p(n) goes to a single digit in 7 steps.
Postulated to be finite and complete.
a(9), if it exists, is > 10^20000, and likely > 10^119000.
|
|
|
LINKS
|
Table of n, a(n) for n=1..8.
Daniel Mondot, Multiplicative Persistence Tree
Eric Weisstein's World of Mathematics, Multiplicative Persistence
|
|
|
EXAMPLE
|
338688 is in this sequence because:
- 338688 goes to a single digit in 7 steps: p(338688) = 27648, p(27648) = 2688, p(2688)=768, p(768)=336, p(336)=54, p(54)=20, p(20)=0.
- p(4478976) = p(13477889) = 338688, etc.
|
|
|
MATHEMATICA
|
mx=10^16; lst=Sort@Flatten@Table[2^i*3^j*5^k*7^l, {i, 0, Log[2, mx]}, {j, 0, Log[3, mx/2^i]}, {k, 0, Log[5, mx/(2^i*3^j)]}, {l, 0, Log[7, mx/(2^i*3^j*5^k)]}];
Select[lst, Length@Most@NestWhileList[Times@@IntegerDigits@#&, #, #>9&]==7&] (* code for 7-smooth numbers from A002473. - Giorgos Kalogeropoulos, Jan 16 2022 *)
|
|
|
CROSSREFS
|
Cf. A002473, A003001 (smallest number with multiplicative persistence n), A031346 (multiplicative persistence), A031347 (multiplicative digital root), A046516 (all numbers with mp of 7).
Cf. A350180, A350181, A350182, A350183, A350184, A350185, A350187 (numbers with mp 1 to 6 and 8 to 10 that are themselves 7-smooth numbers).
Sequence in context: A114674 A185475 A224632 * A234726 A132660 A236609
Adjacent sequences: A350183 A350184 A350185 * A350187 A350188 A350189
|
|
|
KEYWORD
|
nonn,base,more
|
|
|
AUTHOR
|
Daniel Mondot, Jan 15 2022
|
|
|
STATUS
|
approved
|
| |
|
|
