login
A328582
Least common multiple of nonzero digits in primorial base expansion of n.
5
1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 6, 6, 4, 4, 4, 4, 4, 4, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 6, 6, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 6, 6, 6, 6, 6, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 6, 6, 3, 3, 3, 3, 6, 6, 6, 6, 6, 6
OFFSET
0,5
COMMENTS
a(0) = 1 as an empty product.
FORMULA
a(n) = A072411(A276086(n)).
PROG
(PARI) A328582(n) = { my(m=1, p=2); while(n, if(n%p, m = lcm(m, n%p)); n = n\p; p = nextprime(1+p)); (m); };
CROSSREFS
Cf. A276156 (positions of 1's).
Sequence in context: A246359 A328114 A343504 * A227153 A328581 A238643
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 21 2019
STATUS
approved