A393059 - OEIS

%I #8 Feb 04 2026 11:50:30

%S 1,2,2,6,2,6,2,18,6,18,2,90,2,30,18,90,2,30,2,90,30,90,2,450,18,150,

%T 30,450,2,450,2,450,90,450,90,2250,2,750,150,2250,2,750,2,2250,450,

%U 2250,2,11250,10,11250,450,11250,2,3750,90,11250,750,11250,2,15750,2,42,750,3150,450,15750,2,3150,2250,3150,2

%N a(n) = LCM_{d|n, d<n} A276086(d), where A276086 is the primorial base exp-function.

%H Antti Karttunen, <a href="/A393059/b393059.txt">Table of n, a(n) for n = 1..11550</a>

%H <a href="/index/Lc#lcm">Index entries for sequences related to lcm's</a>.

%H <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>.

%F a(n) = A276086(A393063(n)).

%o (PARI)

%o A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };

%o A393059(n) = { my(m=1); fordiv(n,d,if(d<n, m = lcm(m,A276086(d)))); (m); };

%Y Cf. A276086, A393060 (rgs-transform), A393063.

%Y Cf. also A393061.

%K nonn,base,easy

%O 1,2

%A _Antti Karttunen_, Feb 04 2026