%I #9 Jul 19 2021 01:26:20

%S 1,2,9,18,3,6,25,50,225,450,75,150,625,1250,5625,11250,1875,3750,5,10,

%T 45,90,15,30,125,250,1125,2250,375,750,49,98,441,882,147,294,1225,

%U 2450,11025,22050,3675,7350,30625,61250,275625,551250,91875,183750,245,490,2205,4410,735,1470,6125,12250,55125,110250,18375,36750,2401

%N a(n) = A276086(A328622(n)).

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

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

%F A342001(a(n)) = A346252(n).

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

%Y Cf. A002110, A276085, A276086, A328618, A328622, A346233, A346252.

%K nonn,base

%O 0,2

%A _Antti Karttunen_, Jul 11 2021