A346101 "Inverted variant" of A276086: a(n) = A276086(A289234(n)).

1, 2, 3, 6, 9, 18, 5, 10, 15, 30, 45, 90, 125, 250, 375, 750, 1125, 2250, 25, 50, 75, 150, 225, 450, 625, 1250, 1875, 3750, 5625, 11250, 7, 14, 21, 42, 63, 126, 35, 70, 105, 210, 315, 630, 875, 1750, 2625, 5250, 7875, 15750, 175, 350, 525, 1050, 1575, 3150, 4375, 8750, 13125, 26250, 39375, 78750, 2401, 4802, 7203, 14406

Offset: 0

Author

Antti Karttunen, Jul 10 2021

Keywords

• nonn
• look

Links

• Antti Karttunen, Table of n, a(n) for n = 0..16170
• Index entries for sequences related to primorial base

Crossrefs

Cf. A276086, A289234, A344760.

Cf. also A328624, A328627, A346102.

Programs

PARI

A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A289234(n) = { my(pr=1, p=2, v=0); while(n>0, my (d=n%p); if(d>0, v += pr * lift(1/Mod(d, p))); pr *= p; n \= p; p = nextprime(1+p)); return(v); }; \\ From A289234.
A346101(n) = A276086(A289234(n));

PARI

A346101(n) = { my(p=2, m=1); while(n>0, my(d=n%p); if(d>0, m *= p^lift(1/Mod(d, p))); n \= p; p = nextprime(1+p)); return(m); };

Formula

a(n) = A276086(A289234(n)).