A346102 a(n) = A276086(A328622(n)).
1, 2, 9, 18, 3, 6, 25, 50, 225, 450, 75, 150, 625, 1250, 5625, 11250, 1875, 3750, 5, 10, 45, 90, 15, 30, 125, 250, 1125, 2250, 375, 750, 49, 98, 441, 882, 147, 294, 1225, 2450, 11025, 22050, 3675, 7350, 30625, 61250, 275625, 551250, 91875, 183750, 245, 490, 2205, 4410, 735, 1470, 6125, 12250, 55125, 110250, 18375, 36750, 2401
Offset: 0
Programs
-
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); };