A328584 Least common multiple of n and A276086(n).

0, 2, 6, 6, 36, 90, 30, 70, 120, 90, 90, 990, 300, 650, 1050, 150, 3600, 7650, 2250, 4750, 1500, 5250, 24750, 51750, 15000, 1250, 48750, 33750, 157500, 326250, 210, 434, 672, 462, 2142, 630, 1260, 2590, 3990, 2730, 2520, 25830, 1050, 15050, 23100, 3150, 72450, 148050, 42000, 12250, 5250, 89250, 409500, 834750, 236250

Offset

0,2

Links

Antti Karttunen, Table of n, a(n) for n = 0..10000

Index entries for sequences related to lcm's

Index entries for sequences related to primorial base

Formula

a(n) = lcm(n, A276086(n)).

a(n) = A324580(n) / A324198(n).

Prog

(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A328584(n) = lcm(n, A276086(n));
(PARI)
A006530(n) = if(n>1, vecmax(factor(n)[, 1]), 1); \\ From A006530.
A328584(n) = if(!n, n, my(m=1, p=2, orgn=n, maxp = A006530(n)); while(n || (p<=maxp), m *= (p^max(n%p, valuation(orgn, p))); n = n\p; p = nextprime(1+p)); (m));

Crossrefs

Cf. A276086, A324198, A324580.

Sequence in context: A155948 A368393 A228955 * A226707 A097504 A356521

Adjacent sequences: A328581 A328582 A328583 * A328585 A328586 A328587

Keyword

nonn

Author

Antti Karttunen, Oct 21 2019

Status

approved